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EPSON ^ 

SALE ENDS JUNE 15 1982 

PRINTERS EPSON • MX 80 G (with Graftrax 80) $ 475.00 

SALE MX 80 FT (friction / tractor feed) $ 616.00 

PRINTERS MX 80 FT G (fri./ traj Graftrax 80) $ 655.00 

SALE MX 100 (132 column printer) $ 742.00 

PRINTERS NEC---- PC-8023 A (80 col./ 100 cps/ friction 

SALE or tractor feed / porportional 

PRINTERS spacing / 7X9 dot matrix) - - $ 500.00 

SALE OKIDATA - - - Microline 82 A (80 col./ 120 cps / 9x9 

PRINTERS dot matrix) $ 475.00 

SALE Microline 83 A (132 col./ 120 cps / 9x9 

PRINTERS dot matrix / tractor feed) $ 745.00 

* ic * * ic ic ic ic ic ic if ic ic ic ic ic if ic ic ic ic ic ic ic * ic -k ic ic ic ic ic ic ic ic ic ic ic ^ 

MODEMS HAYES Stack Smartmodem (direct connect/ RS 232/ 

SALE auto answer/ auto dial) -$ 230.00 

MODEMS MICROCONNECTION For Atari (Works without 850 Interface, 

SALE Micro A plugs into joy stick ports.)- $ 249.00 

MODEMS Micro AAD (With Auto Dial ) $ 328.00 

SALE MICROCONNECTION For Atari (For use with 850 Interface.) 

MODEMS Micro B • $ 199.50 

SALE Micro BAA. (With Auto Dial-Auto Answer ) $ 278.50 

MODEMS (Microconnection modems are supplied with Terminal 

SALE Emulation Program.) 



i 



MICROCONNECTION 



TM 




MAIL ORDERS TO: 



KIRK'S MICRO SALES 
P.O. BOX 2145 
LIVONIA, MICHIGAN 48151 
(313) 427-1402 



*************** 

* IN MICH. ADD 4% SALES TAX * 
*************** 



SHIPPED DIRECT TO YOUR HOUSE BY U.P.S. (Save gas shop by mail.) 

Send certified check or money order for fas tes t delivery. Personal checks allow 

two weeks delivery. 



M.A.C.E., 



MAY, 1982 
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Sheldon L oetiion » Smxmtmry 

By now I'm getting pretty tired of starting 
these ttiings i^ith m#iiibership boasts» so 
suffice it to say that we passed the 400 mark 
last month« 

For Show-and-Tellt Craig Chamberlain led 
off with a demonstration of the Advanced 
Music Composer from APX, which alloii#s f0r 
fast tempos (tempii?) and in addition lets you 
play a lot of notes in a short time» It allows 
for envelope shaping (something like twisting 
balloons into animal shapes) by the expedient 
of turning long notes into a lot of shorter 
notes of differing volume. That can mean a lot 
of notes to enter, but also some nice sounding 
musiCf 

A short unplanned demo of some new games 
(Apple Panic, Threshold) came next. In the 
future, we plan to dispense with all unplanned 
presentations* At least, that's the plan. The 
business portion of the meeting followed, 
where the most import#irt pieci^ 0f business 
introduced was the authorization of the boftrd 
to investigate a projection TV system to 
alleviate present monitor woes« Hopef ully » an 
demo of an outrageously expensive system 
will be one of the feature of the May Birthday 
Party* 

Following the business portion # I gave a 
short summary of my findings on the new 
Microsoft BASIC, and took some questions* I 
must admitf being used to Atari BASIC, I am 
somewhat slow to warming up to this big 
mother* But, as pointed out by Tom Giese, it 
has several very powerful features, such as 
the deftiwdt fwiction commmand, that bear 
doser examination* It also has at least a few 
bugs (one member claims that under certain 
drcumstmcses, the time stack shows up in the 
screen display area!!)* 

Finally, Craig ChamberlMn did an encore 
with an introduction to Atari PILOT* 
Unfortunately, because of the late hour, many 
members miss#il his presentationt In the 
future, we will try to present the main 
program first, so that those wishing to take 
advantage f^f the late store hours on MACE 



nights may do so without missing the program* 
Either thiitr or we will disfM^nse with the 
program altogether and orgafiii» i^to gangs 
for the purpose of looting the stores* It 
would serve them r^jht for turning what would 
otherwise be a religous experience ii»t# a 
crass opportunity to gather in the green* 

One piece of business that cam# up at ttie 
board meeting that the membership at large 
might wish to be aware of is the possibility of 
starting MACE chapters in other dtiest Under 
this plan, the otherwise-autonomous club 
would be offered the main benefits of MACE 
membership (i*e* the incomparable MACE 
newsletter, and program library), at a reduced 
group rate which would allow the club to 
collect its own dues in addition* By shipping 
the newsletters in one batch by UPS, MACE 
would save enough money on mailing costs to 
make this reduced rate economically feasible* 
We have already had inquiries from groups in 
Grand Rapids and Lansing# and would 
entertain bids for chapterhood from any group 
of 25 of more* 

Thanks to Jerry Aamodt for filling in for 
the absent Arlan, and to Craig for his 
SifMiechifying* I'm going to cut it short this 
monthf lieeitise I've got to get my pwrty mtmmm 
on — you all better take notes at the next 
meeting^ because you'll be on your own* ^ 



Reviewed by 
Eric Chodun 

Your ship is shooting against many waves 
of aliens! Lookout! Don't over heat your 
lasers* Every four boards cleared you say hi 
io Ma an^d rvfyel* Every alien %#aye gets 
harrier* Your Ma, or Mother ship refuels your 
ship and gives you bonus points for each bit of 
fuel you have left* 

Threshold is a hard> fun action game 
because there are different objects to shoot 

at for each board (dr wave)* There are eagles, 
caterpillars, centipedes, and the like* It's well 
worth the money! By On-IJne Systems* 
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Call (313) 647-3620 



The Center For: 

Data Cartridges 
Disc Storage/Filing Systems 
Rediform Business Forms 
Magnetic Media 



Typewriter Ribbons 
Printer Ribbons 
Computer Forms 
Acco Binders 
Computer Furniture 



MOORE 



MOORE 

BUSINESS 

CENTER 



Division of Moore Business Forms. Inc. 

30600 Telegraph, Suite 1101, Birmingham, Mi 48010 
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Moore Printout Paper is Priced Right! Qualifies for Mix and iy/!atch Discount. 
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Catalog 
Number 














Prio* per carton 




Description 


W.«L. 


Weight 


Paru 


uiy. 
parctn. 


1-9 

Ctns. 


3-5 

ctns. 


6-9 
ctns 


lu cms. 
& over 


A10025** 


line tint 


8/2X11" 


13J4# 


1 


3.200 


$27.85 


$25 05 


$23.70 


$22.30 


A10116** 


line tint 


11^4X8^4" 


15# 


1 


3.200 


29.90 


26.90 


25.40 


23.90 


A10165** 


line tint 




20# 


1 


2.600 


38.50 


34.65 


32.70 


30.80 


A10173** 


line tint 


14^8x8/2" 


18# 


1 


2.600 


31.90 


28.70 


27.10 


25.50 


A10181** 


line tint 


14^^x8/2" 


15# 


1 


3.200 


35.35 


31.80 


30.05 


28.30 


A10215** 


line tint 


14]%x 11" 


20# 


1 


2.600 


38.50 


34.65 . 


32.70 


30.80 


A10223** 


line tint 


14J6X 11" 


18# 


1 


2.600 


36,85 


33.15 


31.30 


29.50 


A10231** 


line tint 


14^6 x 11" 


15# 


t 


3.200 


41 05 


36.95 


34 90 


32.85 


A10033** 


cartoon-interleaved line tint 


8/2X 11" 


13/2# 


2 


1.400 


36 20 


32.60 


30.80 


28.95 


A10041** 


cartwn-tnterleaved line tint 


8/2x11 " 


15# 


3 


850 


34.05 


30.65 


2895 


27.25 




carbon-interleaved line tint 


14/8x8/2" 


13/2# 


2 


1,650 


43 20 


38.90 


36.70 


34 55 


A 10207** 


carbon-interleaved line tint 


14/8x8/2" 


13/2# 


3 


1,000 


41 65 


37 50 


35.40 


33 30 


A 10249** 


carbon-interleaved line tint 


14/8X 1 1 " 


13/2# 


2 


1 .650 


49 90 


44 90 


42.40 


39.90 


A 1 0256 * 


carbon-interleaved line tint 


14/e X 1 1 " 


13/2# 


3 


1,000 


48 15 


43.35 


40.90 


38 50 


A 10009* 


blank form 


8/2x11 " 


15# 


1 


3.200 


27.85 


25.05 


23.70 


22.30 


A 1 0058 


blank 


8/2x3/2" 


15# 


1 


6,400 


20.50 


18.45 


17.40 


16.40 


AlOOoo • 


blank 


9/2 X 1 1 " 


20# 


1 


2.600 


28.75 


25.90 


24.45 


23.00 


A10074 • 


blank 


9/2x11 " 


15# 


1 


3.200 


30.30 


27.30 


25.75 


24.25 


A 10082* • 


carbon-interleaved blank 


X 1 1 " 


13Ht 


2 


1.650 


37.90 


34.10 


32.20 


30.30 


A 10090 • 


carbon-interleaved blank 


9Hx 11" 


135^# 


3 


1.000 


36 15 


32.55 


30.70 


28.90 


A10108 • 


carbon-interleaved blank 


9/2x11" 


12# 


4 


800 


43.70 


39.35 


37.15 


34.95 


Aid 24* • 


blank 


12x8/2" 


15# 


1 


3.200 


30.80 


27.70 


26.20 


24.65 


A A 0^^A 

A10017** 


carbonless blank 


8/2 X 11 " 


14# 


2 


1.800 


47.70 


42.95 


40.55 


38.15 


A A A AA^-** 

A 10496** 


carbon-interleaved Economy line tint 


14^8 X 1 1" 


15# 


2 


1.350 


42.30 


38.05 


35.95 


33.85 


A1USU4 


carbon-interleaved Economy line tint 


^4% X 11" 


15# 


3 


850 


42.40 


38.15 


36.05 


33.90 


AiOd12 


carbon-interleaved Economy line tint 


1456 X 11" 


12# 


4 


750 


52 70 


47 45 


44.80 


42.15 


AT 0405 


Economy line tint 


9/2x11 " 


18# 


1 


2.600 


24 85 


22 35 


21.10 


19.90 


A 4 AAA-Ai**~ 


Economy line tint 




18# 


1 


2.600 


24 85 


22.35 


21.10 


19.90 




Economy line tint 


14/8 X 8/2" 


15# 


1 


3,200 ^ 


30.80 


27 70 


26.20 


24 65 


A 10488** 


Economy line tint 


14/8 X 11" 


15# 


1 


3.200 


35.80 


32.20 


30.45 


28.65 


A 10454** 


carbon-interleaved Economy line tint 


14/8x8/2" 


15# 


2 


1.350 


36 65 


33.00 


31.15 


29.30 


A10462** 


carbon-interleaved Economy line tint 


14/8x8/2" 


15# 


3 


850 


36.60 


32.95 


31.10 


29.30 


A 10470** 


v^ai 1 II iici icdvcvj ^uv/iiuiiiy line iirii 


^ AT/ V Q 1/ " 
1 **/8 X 0/2 


1 ^# 


4 


750 


45.65 


41.10 


38.80 


36.50 


A10132** 


carbonless line tint 


14/8X8/2" 


14# 


2 


1.800 


56.80 


51.10 


48.30 


45.45 


A10140** 


carbonless line tint 


U^ixSH" 


t4# 


3 


1.150 


57.65 


51.90 


49.00 


46.10 


A10157** 


carbonless line tint 




14# 


4 


850 


56.95 


51.25 


48.40 


45.56 


A10264** 


carbonless line tint 


1456x11" 


14# 


2 


1.800 


65.65 


59.10 


55.80 


52.50 


A10272** 


carbonless line tint 


14/8x11" 


14# 


3 


1.150 


66.70 


60.05 


66.70 


53.35 


A10280** 


cart)onless line tint 


14/8x11" 


14# 


4 


850 


65.90 


59.30 


56.00 


52.70 


A10298** 


carbonless line tint 


1456 X 11" 


14# 


6 


700 


73.10 


65.80 


62.15 


58.50 


A10306** 


carbonless line tint 


1456x11" 


14# 


6 


600 


78.30 


7050 


66.55 


62.65 


A10314*** 


carbonless Speediread 


1456x8/?" 


14# 


2 


1.800 


59 15 


&3.25 


50.30 


47.30 


A10322*** 


carbonless Speediread 


1456x8'/^" 


14# 


3 


1.150 


60.05 


54.05 


51.05 


48.05 


A10330*** 


carbonless Speediread 


1456 x8/2" 


14# 


4 


850 


59.25 


53 30 


50.35 


47.40 


A10371*** 


carbon-interleaved Speediread 


14/8x8/2" 


15# 


2 


1.400 


44.90 


40 40 


38.15 


35.90 


A10389*** 


carbon-interleaved Speediread 


14^^x8/2" 


15# 


3 


850 


43.30 


39.00 


36.80 


34.65 


A10397*** 


carbon-interleaved Speediread 


14/9x8/2" 


12# 


4 


800 


53 30 


48.00 


45.30 


42.65 


A 10348*** 


Speediread 


14% X 8/2" 


20# 


1 


2.600 


34.45 


31 00 


29.30 


27.55 


A10355*** 


Speediread 


1456x8/2" 


18# 


1 


2.600 


32.95 


29.65 


28.00 


26.35 


A10363*** 


Speediread 


14/8x8/2" 


15# 


1 


3.200 


36.70 


33.05 


31.20 


. 29.30 


A 10439** 


Ruled heading Economy 


14/8x8/2" 


15# 


1 


3.200 


35.80 


32.20 


30.45 


28.65 


A10421** 


Economy Speediread 


1456x8/2" 


15# 


1 


3.200 


31.90 


28.71 


27.10 


25.50 
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KIOS AISID COMJPXJTERS 

By Marshall S« X}ubio 



After having my computf r for a couple of 
yearsf and after having learned to program in 
BASIC, a smattering of ASSEMBLER, and 
PILOTf and after having learned my fair share 
of "computereese'S I considered myself to be 
finally computer literate* Big deal! The other 
day when I came home from work, there was my 
wife and three year old daughter Samantha 
seated at the Atari, and the three year old 
was trying to teach my wife the sequence for 
clearing the screen* In fact» so my chagrined 
wife reported to me later that evening, 
Samantha had taught her not only how to turn 
on the machine, but how to boot the disk drive 
up before powering on the computer! 

Alright^ so maybe Diaimm had beM morking 

for a couple of weeks with Samantha on the 
computer, and maybe Samantha was strutting 
her stuff by showing mommie how its doiiet 
BUT, my definition of computer literacy, 
having evolved as a result of my own trials 
and tribiilations within the sbadaMy world of 
bits and bytes, suddenly became shatteringly 
inadequate* For example, I always hesitated 
to consider my tbree thousand dollar 
investment in high technology a "game 
machine'^ and I never did consider present 
offerings of software to have any REAL 
educational value, and yes, I scoffed at the 
value of playing shoot-em up video games* You 
can't learn from turning on the power and 
playing with the keys! About then I woke up* 

Learning! is said to be a change in behavior 
as the result of some intervention* Normally 
we think of parents and teachers as the ones 
providing that intervention » and usually this 
is the case* Often overlooked, however is the 
environment and its influences upon the 
learning process* This is the educational 
"ecology", and becoming more and more 
prominent within this sphere is the 
microcomputert 

At the more advanced levels of learning^ 
computers can do wonderful things* They can 
provide instruction, drill and practice, present 
information and test for knowledge and skills* 
These types of tasks are becoming more and 



more integrated with computers all the time* 
School districts are buying computers left and 
right* Entire curriculums are cropping up right 
before our very eyes, technologists are telling 
us how to build Gomputers# educators tell us 
how to use them, philosophers are deciding 
whether we should use them, and futurists 
drool with delight and antici|Mtion over what 
is yet to come* With this great march of 
technology comes the development of highly 
integratedf structured educational experiences 
designed around the use of a micro«f tbut i#ait» 
I was telling you about Samantha» wasn't I? 

At three> she had not the opportunity to 
part take of all the structured learning 
experiences awaiting her in school* She cannot 
read or write to any degree of sophistication» 
let alone manipulate the Atari joystick in 
many of the fancy maneuvers required by much 
of the pre-school software I brought home to 
her* She obviously has no formal training in 
computersf So why the learning? And why the 
sudden interest of my wife Dianne <when are 
you going to resign from that stupid computer 
club)Dubiii? 

It started out by letting her play around in 
the "memo pad" mode* This basic excercise of 
printing letters on the TV mushrooiMcl in no 
time at all***like so* 

***"can I spell my name?* 

***"how do you erase it?" 

•♦•"how do the letters get so big?" 

*f* *can I put the disk in" 

***"no mommy, this is the disk with my stuff" 

***"daddy» can I press buttons? 

**«"daddy, when you're done with your 

homework, can I be next?" 

•**"mommy» can I use daddys 'umputer?" 

*f*"daddy» first you got to boot up the disk" 

•**Hmmm* 

Naturally, software support at the 
pre-school level would be great* To date the 
best attempt at this has been "My First 
Alphabet", and it's comforting to see that 
much miMre is becoming available all the time* 
Another useful tool is the Votrax speech 
synthesizer* Your non-reading pre-schoolers 
will appreciate hearing what they cannot read» 
not to mention the obvious merits of auditory 
feedback* But other than that, I can't really 
recommend much in the way of pre-school 

conniiuoa 
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software. Many of the programs I've seen tend 
to be either too sophisticated for younger 
children or else too mundane* Graphics and 
sound are nice, but I can get that result from 
letting Sam play with Space Invaders* Too 
much reliance on joystick control is also a 
problem. Remember that we are dealing at the 
pre-school level* These kids are just 
developing their motor and perceptual skills. 
Coordination is very much a problem as is eye 
hand movement and span of concentration. To 
manipulate a joystick even in only two 
directions, is not especially easy at that age. 
The tight play of Atari joysticks are pure 
labor to one so young (and indeed to one so 
old!). Remember your audience. Whats helpful 
is lots of cause and effect* Bells and wistles 
that the child can produce with the least 
amount of coordination. As the child 
progresses, you can build on this by requiring 
increasingly more coordinated input. Likewise 
you can start off with simple cause and effect 
type activity and build into this basic 
discriminations of letters » color » objects, 
words- the sky is the limit. Just start at a 
level appropriate for the child and DON'T 
PUSH! Discovery and experimentation are 
healthy. 

R*€pgnize that the lack of outstanding 
pre-school software does not really handicap 
you to any great extent. Actually just the 
experiena of using a computer is educational 
in itself. This so-called learning by doing has 
many advantages* First of aU there is merit in 
such "discovery learning" in that the child is 
exposed at his or her own pace to the new 
experience that a c^imputer provides* Curiosity 
is at its highest at a young age, and 
exploration and experimentation greatly 
stimulate learning* As the child gains 
experience and familiarity, learning is 
stimulated even more. As the child grows 
older, the technology grows with him* Simple 
cause and effect responses give way to 
concept acquisition, problem solving ability, 
and more complex types of learning. For the 
elementary age child, learning to program 
offers the benefit of structured logical 
thinking and problem solving, and the use of a 
technology which the child has grown to 
understand and accept. But it has to begin 
somewhere, and that somewhere usually 
begins with learning how to "press buttons"* 

The most simple excercise available is to 



let the child play around in the MEMOPAD 
mode* Let t*^m press the buttons, learn the 
letters, and get used to sitting at the console* 
You may want to write a short BASIC routine 
that #ctHit characters in GRAPHICS 2 size 
letters, or in inverse video. These stand out 
and are more easily perceived by young eyes* 
Playing with games, sound or graphics demos 
can also be useful, but remember that the key 
is INTERACTION between your child and the 
technology* Learning by doing-so to speak* 

One of the most popular programs I've 
used with young children is from our MACE 
library. It is a spelling program that flashes a 
word briefly on the screen and the student 
then respomls by spelling the word out on the 
keyboard. I modified this to do the following** 

1 * Take a word from a list* 

2. Put it on the screen in LARGE print* 

3* Allow the child to copy the word by 
entering characters which will appear 
underneath the mmi m ^ screen* 

4* Screen out all non wanted user input* 

5. Have the Votrax speak the word as it 
is put up, and echo the letter responses of the 
child. 

6* Make the word list f amiUar to the * 

Such a program does wonders for letter and 
word reccHEjnition* It can be practiced at a very 
early age, requires little sophisticated 
software (the Votrax is optional, although 
highly recommended), and can be done at home, 
literally in your spare time, having 
measureable results on your child's ability to 
acquire these vital skills* 
But as far as educational and technical 
spohistication, the program is simplicity in 
itself. A copy of this program is listed here in 
this months MACE* You should try it! 

Talking the other day with Mark Davids of 
the educational SIG, we were toying with the 
idea of comming up with a compendum of 
educational Atari software^ wtuch iMy he tieed 
as Is or customized for individual learning 
levels. I also understand that some of our 
members have been doing some neat things 
with kids md Atari's* I think that many of us 
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have a lot to share and hopefully we can 
eventually coordinate some effort to provide a 
few good educational programs or ideas to 
membei^ wisWng to use their computer as an 
educational tooh If you're interested* let me 
know» I would enjoy hearing what others are 
up tOf and by sharing* we ALL learn# Possibly 
we could even have an educational forum right 
here in the ol MACE* (I have connections with 
the iKlitor)* 

And what of Dianne? Well, since Samantha 
is so hot and heavy into computers» WHO 
beats me to the latest copy of the APX 
catalog? And WHO recomended we run an 
ym^sified ad leaking for used Atari 400'S?? 

Computer literacy you say? Remember, 
the next time your 10 year old blasts the 
invaders from outer space, its only a matter 
of time before you start hearing things 
like»M"dad# whats a modem?" or "mommy, how 
do I allocate RAM for a new OS driver*.*" 
Don't say I didn't warn you* q 




BAKER STREET BYTES 
March IssueUword processor) 

change the last paragraph fromJ 
LINE+1330 to LINE=1340 
GOTO 1100 GOTO 1100 

APRIL IssueHvariables) 
Add the following line to the printer listing? 
32S35 ?*TTPE Y FOR YES" 

This listing should have also appearedJ 

32500 REM VARIABLE NAME LISTER 

32510 REM BY RICHARD GIZYNSKI 

32560 WHERE=PEEK(130)+256*PEEK(131) 

32580 IF WHERE=PEEK(132K256*PEEK(133) 

THEN PRINT "—THAT'S ALL FOLKS" :END 

32590 PRINT CHR$(PEEK(WHERE)); 

32600 IF PEEK(WHERE)>127 THEN PRINT " "J 

32630 WHERE=WHERE+1 

32640 GQT0 321^ 




NEXT MEETING-JUNE 3'RDt 7J00 AT 
COMPUTER HORIZONS 



NEXT MEETING-THURS, MAY 27. 
PLEASE BRING SOFTWARE SAMPLES. 
CALL MARK DAVIDS, 774-9709 FOR 
INFO* 



CALL CHUCK USHER IF YOU ARE 
INTERESTED IN THIS SIG* 293-1654 
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F>RE — SCHOOL. 

By Marshall Dub in 

This program is designed to teach letter 

and word recognition primarily in pre-school 
children. The listing shown here was designed 
for use with a Votrax speech synthesizer or 
simihar voice output devices* although this is 
not a requirement* 

The screen will display a word from a list 
of words and pronounce the word as it is 
displayed. Then the child copies the word 
using the keyboard. As the letters of the word 
are entered, the Votrax will echo them back to 
the child/When ttie kitters have been entered, 
the child pushes the RETURN key and the word 
is corrected. If the word was copied correctly, 
the computer will respond with at RIGHT! If 
notr the computer will inform the child of the 
error and allow another chance. If the child 
misses the second try, the answer is provided 
and the computer continues with the next 
word* When all of the words in the list have 
beeii used, the computer will display a score* 

Although the listing is quite ample, this is 
really a "bare bones" program* The addition of 
graphics and sound would Spiff it up 
laonsiderably. Although the program is pretty 
^1 documented, here are a few pointers: 

1* The variable MAX is set to the number of 
m^dm in the list* If you use a large list, then 
set MAX to a tolerable amount of words so 
the child can see the score routine before he 
grows up to be an adult* 

2* If you don't have a Votrax or some other 
sifniliar voice output device, fear not -just 
RUN the program in listing #2 called "NULL"* 
It will create a NULL handler (N:) which will 
prevent errors when you try to write to a 
non-existant device (like the little voice that 
wasn't there)*'Just LOAD the program NULL 
and it will create the "NJ" device and then it 
will run the spelling program for you* 

3. Make the word list familiar to the child, 
and age appropriate-although you just MAY be 
suprised* 

4. Just don't turn the child loose on thm 



program -work with him or her* Provide 
reinforcement and coaching where necessary* 
At first you may have to offer a lot of support 
but soon, the child should master the program 
well enough to go it alone* 

5* If you are serious (and lazy), send me a 
disk, and I will save you lots of typing time! I 
think it will work on tape also, but I have not 
tried it* 

6. Let me know your reactions if you do try 
it* I am open to suggestions and I am willing 
to offer some myself should you need them* 



10 REM SPELLING AND LETTER PRACTICE 
20 REM FOR PRE-SCHOOL AND UP 
30 REM USED WITH VOTRAX TYPE N TALK 
40 REM BUT CAN BE MODIFIED BY USING 
50 REM THE NULL HANDLER ROUTINE* 
60 REM SUPPLIED IN LISTING #2 

70 REM 

80 REM TO USE WITH TYPE N TALK AND 
90 REM A DISK, YOU *MUST* USE AN RS-232 
100 REM RELOCATOR AUTORUNtSYS FILE 
ON DISK*(supplied with DOS II) 

1 10 MAX«23JREM MAX WORDS IN LIST 

120 GOSUB 1590iGOSUB 1380JREM 

initialization 

130 count=o:right=ojtot=o 

140 RESTORE 

150 REM 

160 REM COUNT THE WORDS IN THE LIST 
170 REM 

180 FOR 1=1 TO MAX 
190 READ A$ 

200 IF A»»"END" THEN 230 

210 count=count+i:next I 

220 FOR 1=1 TO 30JINDEX(I)=0}NEXT I 
230 GUESS=OJA*«-"}B*="" 
240 GOSUB 1870 
250 REM 

260 REM SELECT RANDOM WORD 
270 REM 

280 IF TOT«MAX THEN 1020:REM DONE 

290 WORD=INT(COUNT»RHD<lHl) 

300 IF INDEX(WORD)=l THEN 280JREM WORD 

ALREADY USED 

310 INDEX (WORDKl 

320 RESTORE IFOR 1=1 TO WORDJREAD 

a$:next I 

330 REM 

340 REM POSITION CENTERING 
350 REM 

^ ^ continued 
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360 PY»4«MT(LEN(A$)/2+0,5>:YP«PT 

370 L=LEN(A$) 

380 POSITIOM PY,7JF0R 1=1 TO LJPRINT 
#6r-"j:NEXT I 

390 POSITION PY»5 
400 REM 

410 REM PRINT A HORD 

420 REM 

430 PRINT #6}A* 

440 PRINT *2;a«;cr$ 

450TOT=TOT+1 
460 BL=LEN(B$) 
470 POKE 764,255:GET #1,B 

480 REM 

490 REM SCREEN OUT NON DESIRED INPUT 
500 RJBM 

510 IF B=155 THEN 700IREM RETURN 

520 IF B=32 THEN 460:REM SPACE 

530 IF 6=126 AND BL=1 THEN 

B*=""JPY = PY-1 {POSITION PY,7JPRINT 

#6J"-";G0T0 460JREM BACKSPACE 

540 IF B-126 THEN 

B$ = B*<1 ,BL-1 )JPY = PY - 1 .'POSITION 

PY,7JPRINT #6r-":GOTO 460 

550 IF B>96 AND B<I23 THEN B=B-32{GOTO 

620:REM CAPS ONLY 

560 IF B<65 THEN B=B+64JREM CONTROL 

570 IP B>127 THEN B«B-128!REM INVERSE 

580 IF B<65 OR B>90 THEN 460 

590 REM 

600 REM OUTPUT TO SCREEN AND VOTRAX 

610 REM 

620 PRINT #2}CHR$(B);CR$ 

630 POSITION PY,7{PRINT #6;CHR$<B) 

640 B$(LEN(B$)+1)=CHR*(B) 

650 PY=PY+ 1 

660 GOTO 460 

670 IF PY<YP THEN PY=YP 

680 REM 

690 REM CHECK FOR ERRORS... 

700 REM YOU CAN BRANCH TO AN OPTIONAL 
710 REM SOUND OR GRAPHICS ROUTINE 
720 REM FROM HERE TO PERK UP THE 
730 REM SCORING PROCESS IF DESIRED 
740 REM 

750 IF B«<>A$ THEN 880 

760 REM 

770 REM RIGHT ANSWER 
780 REM 

790 POSITION 0,5:FOR 1=1 TO 25JPRINT #6;" 
"{JNEXT I 

800 POSITION 0,7IFOR I»l TO 25JPRINT #6}" 

"{{NEXT I 

810 POSITION 6,5 

820 PRINT #6}"RIGHT.'" 

830 PRINT #2{"RIGHT";CR$ 



840 RIGHT = RIGHT+1JPS = 200{GOSUB 
1820 {GOTO 230 
850 REM 

860 REM WRONG ANSWER 

870 REM 

880 IF GUESS=1 THEN 950 

890 POSITION 3,5 

900 PRINT #6{"N0, TRY AGAIN" 

910 PRINT #2}"NO TRY AGAIN"{CR* 

920GUESS=1{PS=200JGOSUB 1820 

930 GOSUB 1870 

940 POSITION YP,5{PY=YP:B*=""{G0T0 380 
950 POSITION 7,3a»RINT »6J"WRONG,- 

960 POSITION 4, 4 {PRINT #6{"THE 
RIGHT"{POSITION 5,5{PRINT #6;"ANSWER IS" 
970 POSITION YP,7{PRINT #6;Ai 

980 PRINT #2;"WR0NG THE RIGHT ANSWER 
IS "|A*;CR$ 

990 PS=400 {GOSUB 1820 
1000 GOTO 230 
1010 REM 

1020 REM SCORE ROUTINE 

1030 REM 

1040 GOSUB 1880 

1050 POSITION 1,2JPRINT #6;"HERE'S YOVtt 
SCORE" 

1060 PRINT *2;"H£RE IS YOUR SCORE 
"}NAME*{CR* 

1 070 PY= 1 0-INT(LEN(NAME*)/2+0.5){ YP=PY 

1080 POSITION PY,4 {PRINT #6}NAME* 

1090 POSITION 1,8{PRINT #6r'Y0U GOTJ 

"{RIGHT;" WORDS" 

1100 POSITION 1,10{PRINT #6}"OUT OF{ 
"{MAX}" TRIES!" 
1110 POSITION 1,14 
1120 REM 

1 130 REM CHECK PERCENTAGES 

1140 REM 

1150 IF RIGHT=MAX THEN 1220{REM 100% 
1160 IF RIGHT>INT<MAX«0.8) THEN 1240:REM 

80% 

1 170 IF RIGHT>INT(MAX*0.7) THEN 126a}REM 

70% 

1180 REM BELOW 70% 

1190 PRINT #6rLET'S PRACTICE" 

1200 PRINT #6r SOME MORE" 

1210 PRINT #2{" LET'S PRACK TISS SOME 

MORE"}CR*{GOTO 1280 

1220 PRINT #6{"A PERFECT SCORE!!" 

123 0 PRINT #2}" A PER FECT 

SCORE" ;CR*{GOTO 1280 

1240 PRINT #6}" VERY GOOD" 

1250 PRINT #2i" VERY GOOD";CR* {GOTO 
1280 

1260 PRINT #6;"NOT TOO BAD" 

1270 PRINT #2{" NOT TOO BAD";CR* 



continued 
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1280 POSITION i,2o:print #6;"PREss any 

KEY TO" 

1290 POSITION 4,21JPRINT #A}"PLAY AGAIN" 

1300 PS=300JGOSUB 1820 

1310 PRINT #2r'PRESS EN NEE KEY";CR» 

1320 PRINT #2rTO PLAY AGAIN" }CR* 

1330 POKE 764,255JGET #1»A 

1340 GOSUB 1870:GQTO 130 

1350 REM 

1 3fc0 REM SET UP DISPLAY 

1370 REM 

1380 GOSUB 1880 

1390 POSITION o,3:print #6;"SPELLING 
AND LETTERS" 

1400 PRINT ♦2r'SPELL LING AND LET 

TERS"?CR$ 

1410 PS=3fX):G0SUB 1820 

1420 POSITION ItlOJPRINT #6r'WHAT IS 

YOUR NAME" 

14S0 PRINT #2;"WHAT IS YOUR NAME";CR$ 
144^ POSITION 2,14:PRINT 

1450 POSITION 1,14 

1460 GET *l,BiIF B=155 THEN 1510 

1470 PRINT #2JCHR«Bf|GI» 

1480 PRINT #6;CHR$(B)} 

1490 NAM£«<L£N(NA'|£«H1M:HR»(B) 

1500 rOTO 1460 

1510 POSITION 1,17 

1520 ? #6rGET READY" 

1530 ? #2;"©Et READY "JNAME*;CR* 

1540 PS=100:GOSUB 1820 
1550 RETURN 
1560 REM 

1570 REM INITIAUZATION ROUTINES 
1580 REM 

1590 OPEN #l,4,0,"Kr 

1600 POKE 5804 :REM INIT COLD START 

1610 DIM A$(20),B$<20),NAM£»(20), 

INDEX (30>,CR»(3) 

1620 CR$=CHR$(155) 

1630 REM 

1640 REM OPEN RS-232 FOR VOTRAX 

1650 REM 
1660 TRAP 1760 

1670 OPEN #2,8,0,"R2{":REM BLOCK MODE 

1680 XIO 32,#2,0»0,"R2":REM FORCE SHORT 
BLOCK 

1690 XIO 34,#2,48,0,"IG"aiEM RTS=ON 

1700 XIO 36,#2,13,0,"R2J":REM 4800 BAUD 
1710 PRINT #2K:R> 
1720 RETURN 
1730 REM 

1740 REM RS-232 ERROR TRAP 

1750 REM 

1760 TRAP 40000JTRAP 1 770:OPEN 



#2,8,0/'N}":RETURN 

1770 TRAP 40000:GRAPHICS OJPRINT JPRINT 
"RS-232 MUST BE BOOTED FIRST!" 
1780 CLOSE *2!EliD 
1790 REM 

1800 REM PAUSE ROUTINE 
1810 REM 

1820 FOR 1=1 TO PSINEXT IJRETURN 
1830 REM 

1840 REM SELECT GRAPHICS MODE 

1 850 REM AND DISABLE BREAK 
1860 REM 

1870 GRAPHICS 18JGOTO 1890 

1880 GRAPHICS 17 

1890 POKE 16,64JPOKE 53774,64:RETURN 
1900 REM 

1910 REM *♦» WORD LIST 
1920 REM MAKE SURE THAT MAX IN LINE 
1930 REM 120 IS SET EQUAL TO THE 
1940 REM NUMBER OF WORDS HERE 
1950 REM 

1960 DATA CAT,DOG,HAT»BALL 

1970 DATA MOMMY, DADDY,TREE,BIRD 
19S0 DATA FISH,CUP,BED,PIG 
1990 DATA HAND»FOOT.TOY,CRAYON 
2000 DATA PENNY,BOOK,HOUSE,CAR 
2010 DATA BOAT,GRANDMA,GRANDPA 
2020 DATA END 



LISTING *2 

10 REM NULL HANDLER ROUTINE 
20 REM 

30 REM This routine must be used 
40 REM with the spelling program 
SO REM if no voice output device 
60 REM is available. Otherwise an 

70 REM error condition will occur i 
80 REM 

90 REM To use, just RUN this program 
100 REM first. It will automatically 
1 10 REM create a NULL handler (N:)to 
120 REM replace the missing device, 
130 REM then RUN the program. 
140 REM 

1 50 FOR 1=0 TO 535RE AD A 

160 POKE 1536+I,A;NEXT I 

170 TRAP 1^:X=USR<1536) 

180 TRAP 40000:RUN "DISPELLING" 

190 DATA 160,0,185,26,3,201,0,240,9, 

200,200,200, 1 92 , 34 ,208,242,56, 

96,169,79 

200 DATA 169,73 153,26,3,200,169, 
36, 1 53,26,3,200, 1 69,6,1 53,26,3,96, 
50,6,50,6 ■- -i- 

210 DATA 52,6,50,6,50,6,52,6,76,51,6, 
160,1,96 

o 
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By Sheldon Leemon 

Nowi just b#caus# of the title of this 

column, don't think that this is just going to 
be a carbon copy of the Benioff at Large 
cBlumn ifi the ACE newsletter^ I mean^ Mark's 
writing is so awesome that nobody could 
duplicate it (although Brian Dunn comes close)« 
But ill my oitm way, I would like to write a 
more chatty column about your favorite subject 
and mine» That way» instead of talking about 
all of that technical stuff ttiat nobody 
understands anyway, I can get to perpetuate 
my favorite rumors^ and drop a few names in 
the process* 

Like what about that Jerry White? He's 
one of the most prolific software artists in 

Ataridom* I mean, he's written "Name that 
Song" for Quality Software, "Bowling" for PDI, 
Tricky Tutorial #6 for Santa Cr«i Software^ 
"Fileit 2" a home management database for 
Swifty, "Sunday Golf" for Adventure 
InternAtionaU ''Player Piano" and "Bowlers 
Database" for APX and Santa Cruz, "Letter 
Writer" and "Leap Frog" for CtE*, a buncha 
stuff for Dynacompf and who knows what else* 
Didn't your read his articles in Analog, 
Compute, etc? Well, I was talking to Jerry just 
the other day* I said "Jerry* what's new in 
Ataridom?", and he said "Sheldon, I'm glad you 
asked that question"! Him and me talk like 
this all of the time* you understand* "First of 
all, have you seen Trivia Trek?" he said* 
"Trivia Trek, the Movie?" I inquired* "No# 
Trivia Trek# the Game!" came the response* 
"I'll ship you one right away"* 

Now, I must admit that this news did not 

make my heart beat any faster* Sure, I've 
been known to turn a page or two of the Book 
of Lists when conveniently placed in a 
bathroom, but outside of a desperate hunger 
to appear on Jeopardy, I've never been what is 
referred to as a trivia buff * But I was 
pleasently surprised when the package 
arrived* First of all, the trivia quiz is in a 
nicely done format* Second, the quiz itself is 
much more interesting than the usual — it even 
challenged the Ol' Perfesser at times* And 
Jerry's put a lot of data on the disk, hundreds 
of questions* Nicest of all, m my opinion, is 
the accessory program for creating your own 



quiz questions* That is where the program 
really has the potential to take off* Users 
can easily create their own quiz questions^ and 
there's even a contest sponsored by Swifty 
Software (the Publisher) for user-created data 
files* Now fanatics of all stripes can really 
get their jollies* I mean, baseball buffs can 
make up data disks full of the most obscure 
and meaningless statistics^ and subject their 
family and friends to hours of harrassment* 
The mind boggles* And for the near-normal» it 
is interesting to note thi^ the prrogram can be 
used to create academic-type quizzes^ for 
those resolute souls who just have to justify 
their purchase by actually using it as an 
educationcQ tool* While not as indispensible 
as Instedit (the graphics tool for young and 
old), and rather difficult to use on the 
commode, this Trivia Trek is really quite a bit 
better than it has any right to be* 

While I'm dropping names, what better one 
to drop than that of our prezt Arlan? Arian is 
at this moment deep in the heart of Texas, on 
a whirlwind MACE goodwill tour* He will be 
communing with fellow enthusiasts for a 
while, and may be bringing back some 
surprises (like new drives from David Small of 
Outpost Atari fame)* If Arlan's Pokes column 
doesn't appear, it's because I was supposed tn^ 
deliver the copy, but lost the key to his house* 
Remember, you read it here first* 

Now for some practical advice* when my 
printer output started fading some time back» 
I made a laughable error that must be 
repeated frequently by the terminally naive* I 
bought a new ribbon and THREW THJi OLD 
ONE AWAT! Such needless waste could have 
been easily avoided if only I had such a wise 
counsellor as you do, dear reader* For as the 
enlightened know, there are many cheaper 
alternatives* For the really frugal, the ink 
can be revived by the use of WD-40 i»r €ither 
penetrating lubicant on the ribbon* For the 
more practical, machines to reink ribbons can 
be purchased for little more than a new 
r^on* SAS Electronics advertised some time 
back in the Computer Trader that they sell a 
motorized Mark IJ inker for $29*95 with a 
guarantee of satisfaction, and an Epson Inker 
for only $9*95* For further information write 
them at 3091 N* Bay Dr«, North Bendt OR 
97459, or call at (503) 754-7155* For those 
who have used ribbons till the fabric wore out, 
don't despair* You can still buy refills for 

c on i ifwd 
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use with the old cartridge* Creative Computer 
at 1236 East Col0fiial Drive, OrlandOt FL 
32803 (305-8944744) advertises cheap reloads 
(3 Epsons for $17)# and BCCOMPCO 800 South 
I7f Box 426, SummersviUe MO 65571 (417 
932-4196) even offers to install the reloads if 
you send them a cartridge* Somewhat more 
locally, Pfete Skeberdis, Box 27, Fremont, MI 
49412 offers to sell refills, reload, or even 
buy the used cartridge from you* So you see, 
you needn't suffer the eiiibaraeeinent of 
having thrown that valuable empty ribbon 
cartridge away# Another service of MACE, 
people for cwnpirtere* 

A veritable explosion of new arcade 
softffare for the Atari makes a permanent 
software guide a likely part of future MACE 



newsletters* For example, bug shoot-em-ups 
are now more numerous than legs on a 
Centipeclei Reomt entries are Millipedes 
(nicely done, but has a fatal flaw--the 
grandaddy of all flickers, which can drive you 
crazy in an instant) and Megalegs (nicely done, 
fast, but just a little crude). Although I 
haven't seen Bug Attack yet, if its like the 
Apple version it will be no big deal* My 
conclusion? Wait for the Atari version f It 
will be released soon, and beats these doggies 
all hoUow* 

Do you have any strong feelings about your 
software? Please send your comments to 
MACE REPORTS, P»0. Box 2785, Southfield MI, 
48037, if you have a piece of software you 
think is a jewel, or a lemon* Q 
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by David Bowen 

There are three methods of keyboard input 
for BASIC programs* These methods are (1) 
INPOT statement, (2) GET statement and (3) 
PEEK(764)* Together these provide a broad 
range of methods* Each is described beloi^t 
with an example to illustrate its particular 
strengths* The differences between the 
methods ocxxsr in the following ar#M« 

A* Is there any preparation required? 

B* Does the computer stop while waiting for 
input? 

C« Is there a ifyestion inark prompt and cursor 
displayed? 

Df Does the computer respond to a keystroke 
with the "chirp" and/or symbol display? 

Et Does the user need to preee RETURN to 

end the input operation? 

Ft Does tlie firogrammer need to decode the 

resulting data? 

Hitti the above as an introduction, we now 

turn to describing the three methods« 

1* INPUT statement* Kith this method »t he 
program stops operation when the INPUT 
statement is reached (i*e« no more BASIC 
statements are executed until the input 
operation is finis hed)f 

The question mark prompt and cursor are 
displayed. There is a "chirp" for each 
iieystroiie> and the key symbol is displayed* 
RETURN must be pressed to input the data 
and have program execution continue* If you 
are writing a program for people not feeiiliar 
%ntti computersf this last requirement can be a 
problem, so include "PUSH RETURN" in the 
inetructiofis you print* Three large 
advantages to the INPUT method are* (a) no 
decoding is required by the programmer (i*e* 
the data can be used without further 
processing)* (b) more than one keystroke per 
variable is handled automatically! and (c) more 



than one variable per input operation can be 
handled automatically* One drawiiKk to tliie 
method is that typing a non-numeric key when 
numeric input has been specified (e*g* by an 
INPUT X statement) will result in 
termination of the program with an error 
message»unless a TRAP statement is used* 

EXAMPLE 
100 TRAP 150 

110 PRINT •TYPE PRIlICIPLEiINTEREST 

(COMMA BETWEEN)- 

120 PRINT "THEN PUSH RETURN." 

130 INPUT PRINtINT 

140 GOTO 170 

150 PRINT "NON-NUMERIC INPUT TRY 

AGAIN" 

160 GOTO 110 

170 MtCantinue with programt 



2. GET statementf Hith this methodt the 

screen must be OPENed first (see example)* 
The GET statement will cause the program to 
stop and wait for input* but without displaying 
the question mark prompt or the cursor* The 
keyboard will "chirp" with each keystroke* but 
the key symbol will not be displayed^ If tlie 
prompt*cursor or key symbol display are 
wanted*they can be programmed as desired* 

Program operation continues as soon as any 
key is pressed; use of the RETURN key is not 
required* Only mm ctMMrac^ ie input per GET 
statement* Data is returned in ATASCII 
code*which can be easily interpreted (see 
example)* The following mmmm^lm has t«#o 
sections* The first section *lines 490-560i (a) 
illustrates alphabetic input and (b) prints all 
input*right or wrong* to the screen* The 
second section»lines 570 to 630* (a) accepts 
either numeric or alphabetic input*and (b) 
prints only appropriate input to the screen* 
Line 490# the OPEN statement* prepares the 
computer for bypassing the normal BASIC 
keyboard routines* 

EXAMPLE! 

490 OPEN #4*4*0*"K*" 

500 PRINT "TYPE S (STOP) OR C (CONTINUE)" 
510 GET *4,XiREM-INPUT8 NEXT 

KEYSTROKE AS X 

520 PRINT CHR*(X)mEM-PRINTS KEY 



The Computer Expre// 



TCE OFFERS IIS ftlSCflUNTS OK 
POPULAR PRODUCTS FM TNE 
ATARI 400/800 



TCE LIST TCE LIST 

3-D SUPER6RAPHICS 30.99 39.95 E MAXELL DISKS (box 10)... 33.99 55.00 

ACTION QUEST 22.99 29.95 E ELEPHANT DISKS (box 10). 19.99 30.00 

========r=r==:r:»r=»nsrs«r»a:sssss DISK DRIVE HEAD CLEANER. 21.99 29.95 

ADVENTURES 11-12 .. each 13.99 19.95 T DiscSavers (vinyl jackets) 5.49 doz. 

ALI BABA k 40 THIEVES .. 24.99 32.95 D TECHNICAL USER NOTES ... 22.99 29.95 

ASTEROIDS .............. 33.99 44.95 K ADVENTURES HINT BOOK 1-12 6.49 7.95 

ATARI NORLD ............ 45.99 59.95 D «■■■»»■«««■■«»»»«■««■■■■■■«■«»■■■««■« 

BASIC A+ 59.99 80.00 D ATARI JOYSTICK (pair)... 15.99 21.95 

BATTLE TREK ............ 30.99 39.95 D ATARI PADDLES 15.99 21.95 

BIG HATH ATTACK 19.99 24.95 D »«Le Stick SALE«» 

BIS HATH ATTACK 14.99 20.00 T 25. 99 sugg list 39.95 

BUD6ETHASTER I CHECK BAL 26.99 34.95 T ===================================== 

BUD6ETMA8TER t CHECK BAL 30.99 39.99 D FLIP ' N ' F I LE 

BUG ATTACK 22.99 29.95 D Siioked Plastic Disk Case. Holds 50 

CANYON CLIHBER ......... 22.99 29.95 T Hinged Lid. Index Dividers Included 

COHPU-HATH/FRACTIOHS ... 22.99 29.95 T TCE Only «21.99 List «9. 95 

CONPU-HATH/DECIMALS .... 22.99 29.95 T =================s=«ss««s=====«=" 

COHPU-READ 14.99 19.95 T 

COHPUTER STOCKS I BONDS. UM 21.00 D ■ ™ ""^ OF THE TUB! 

' 22 '99 29 '95 E I MIND TOYS COMPUTER GAUE 

rS L" M 99 49 95 T I ™E REST OP THE WORLD 

CYPHER BOW. W.W #Y.V3 t | ^ qjj ^ j^U T-SHIBt TOOl 

DATA PERFECT ... 79.99 99.95 D | * ••m*-»»4im, m#w 

_ RICOCHET ^^1!^ 

DATA8N 65 2.0 iim lift) 69.99 89.95 D | ^^^^^^ 

ntoochXIsaMINOTOYS 

QATCCTnyCC QF RVU 14.99 19i95 T H Automatadirmuwlor^ 

■tppi rf«TfnU 1A 00 11 0<! T H P'u^trophlM and cash prlzaa tor thalattftwtimm 

DcrLkLllUPI • • ■ t • ■ • t • 0 ••• 1V«T7 l^aTtJ I ■ ArHl)uattorpvllcipalliH).you-|lg«iaoiMMllMMHl^ 
mmmi H QH T Shirt - Iraa - from MIND TOYS 

nTCt' nCTPrTTUP 77 QQ 79 9S Fl H RlcocrwllatrMfirstabatractacHon-alralagygamadaalgnad 

Uiwrv 1/ClUwliVk ■§■•■■•■■ SmLtll ^7t7w U axclualvely tor th« computer owner. Play agalnat any one of ^ 

r%n nn nn nr' n ^1 4 dKtereni computer opponents, or againal another human 

DUN6 BEETLE a ■ 22 • 7° 2 9 ■ 7 5 D H you can play Ricochet on any Atari.* Apple; or TRS 80' 

EMPIRE OP THE Wmm . 22.99 30.00 T I '^S^H^^XT/^^ ^ 

FAST6AHH0N 14.99 19.95 T I <^-*— » l§f ^] 

FISHIN6 FOR HOHDNYttS ... 11.99 15.00 T 

FROSffiR 26.99 34.95 D ■ tcE 14.99 

GALACTIC EHPIRE 14.95 19.95 T ■ 

GALACTIC TRADER 14.95 19.95 T 

8H0ST HUNTER inw) 22.99 29.95 T ====================================== 

GOHOKU 14.99 19.95 T SIQNALMAN HARK II 

6UESSH0RD 11.99 15.00 T DIRECT CONNECT HODEH for under $100 

HI-RES ADVENTURE #0 .... 19.99 24.95 D Bell 103 type. Built-in 850 Cable. 

HI-RES ADVENTURE 12 .... 25.99 32.95 D Auto Kide select. Talk/Data Snitch. 

INVASION ORION 19.99 24.95 E Only 87.99 List 99.00 

INVITATION TO PROS 2 ... 22.99 29.95 T «=»»«»====================«=«««» 

INVITATION TO PROS 3 ... H.W 21^91^1 Ifct Oopikir ExprMS 

JANBREAKER 22.99 29.95 D <313) 528-1554 

JAHIBEAKER (ne«) 22.99 29.95 T VISA AND MASTERCARD ACCEPTED 






TCE 

LETTER PERFECT 109.99 

LISP INTERPETER 109.99 

LUNAR LANDER 10.99 

HAIL HER6E 22.99 

HATCH RACERS 22.99 

HATH FACTS LEVEL I 11.99 

HIND-B06BLERS I 11.99 

HOUNTAIN SHOOT 10.99 

HOUSKATTACK 26.99 

NAHE THAT SONG 10.99 

OS/A+ 59.99 

POKER SOLITARE 10.99 

POOL 1.5 26.99 

PRESCHOOL FUN 13.99 

OS FORTH 59.99 

RASTER BLASTER 22.99 

REAR 6UARD 14.99 

REAR 6UARD 19.99 

REVERSI 14.99 

RICOCHET (Enter Contest) 14.99 

SPACE INVADERS 33.99 

SPATIAL RELATIONS 13.99 

STAR TREK 3.5 14.99 

STAR TREK 3.5 19.99 

SUNDAY GOLF 10.99 

TEHPLE OF APSHAI 30.99 

TEXT W ZAND 75.99 

THE BASIC COHPILER 75.99 

THE NEXT STEP 30.99 

THE SHATTERED ALLIANCE . 30.99 

THRESHOLD 30.99 

TREASURE flUEST 14.99 

VtSICALC 179.99 

WANTED 11.99 

MARLOCK'S REVENGE 26.99 

NORD SCRAHBLE 11.99 

NQRDHATE 11.99 

ZORK I ■■■•■■■•■■■■leeii 30i99 

ZORK II 30.99 

K=Cartridge T=Tape D=Di5k E 



i I i 



LIST 

149.95 D 

149.95 D 
14.95 T 
29.95 D 
29.95 D 
15.00 T 
15.95 T 
14.95 T 
34.95 D 
14.95 T 
80.00 D 
14.95 T 
34.95 D 
17.50 T 
79.95 D 
29.95 D 
19.95 T 
24.95 D 
19.95 T 
19.95 T 
44.95 K 
17.50 T 
19.95 T 
24.95 D 
14.95 T 
39.95 T 
99.95 0 
99.95 T 
39.95 D 
39.95 B 
39.95 D 
19.95 T 

250.00 D 
15.00 T 
35.00 D 
15.00 T 
15.00 T 
39.95 D 
39.95 D 

« T or D 

SSSSSSSSS8 

i I I 



Hon - Sat 10:00 AM - 9:00 PH 



BET READY FOR SUttHER 
ELEPHANT T-SHIRTS 

' ELEPHANT NEHORY SYSTEMS 
toloriul.. S-H-L or XL 4.99 

HATCH FOR NEW PRODUCT RELEASES 

SEND FOR A FREE CATALOG 



Call in your order (C.O.D. add $1.50) 
or smt Mmty order or check to . . TCE 
P.O. Box 569, Troy HI 48099. Indicatt 
your cooputer and meisory size. Add 47. 
if ftl rotidioU Add S2.00 for shipping 
AlloN 10 days if paynent by chock. 
Sorry no refunds on software. 




t Prices subject to change t Hay Super Spociils aro good until 6/15/82 » 
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SYMBOL TO SCREEN 

530 IF X=ASC("S") THEN END 

540 IF X«ASC("C") THEN 570 

550 PRINT "TYPE S OR C - TRY AGAIN" 

560 GOTO 500 

570 PRINT "TYPE MENU CHOICE 1-4,M FOR 
MENU" 

580 GET #4,X 

590 IF X=ASC<"M") THEN PRINT "M"{GOTO 
lOOOtREM-THIS SECTION WOULD PRINT 
MENU 

600 X=X-48JREM-CONVERTS ATASCII TO 
NUMBER 

610 IF X<1 OR X>4 THEN PRINT "TYPE 1-4 

OR M - TRY AGAIN"{GOTO 570 

620 PRINT XJREM-ONLY PRINTS TO SCREEN 

IF INPUT IS CORRECT 

630 REM-ROUTE PROGRAM ACCORDING TO 
MENU CHOICE 



3f PEEK(764) method. By using the 
PEEK(764) method^the programmer can bypass 
all BASIC and operating system processing to 
tailor the most appropriate response. The 
PEEK at memory location 764 does not halt 
program operation; the contents of this 
location are simply transferred to the 
specified variable and operation continues* 
RETuRn is not used« The cursor, the "chirp" 
and the print to scre«nfif desired, must be 
programmed, but conversely, inappropriate 
keystrokes can be "masked out" or "disabled" 
by not programming responses to them* 
Alternatively ,error messages can be printed 
for them* 

In using this input method, a variable must 
be designated to receive the value stored in 
locatiopi 764# The value is transferred to, say, 
the variable X by the BASIC statement 
X'sPEEK(764lf Simple enough, but there are 
two problems that must be dealt with by the 
programmer* 

The first problem is that location 764 is 
not reset after use by the Operating System* 
The ccHitents of locaticm 764 are simply the 
numerical code for the last key pressed* 
There are many cases where an unforseen 
keystroke can cause problems* For example, 
in executing a BASIC program, the last 
keystroke before execution begins is the 
RETURN to enter RUN* An early PEEK(764) 
wcKitit r#turn the number 12, the code for 



RETURN* The solution for this problem is to 
POKE 764 with the CLEAR key code» 255» 
before the first PEEK and after every PEEK* 
See the second example below* 

The second problem is that the code used is 

neither ATASCII nor the internal code used 
for screen printing, but a third code which is 
called the "keyboard code"* This code is 
nowhere near as neat or rational as the other 
two* Numbers, letters and special symbols 
are out of order and interspersedf How then 
is this code to be interpreted? 

There are two solutions* First you can 
crack the code yourself by running the first 
example program below and typing the keys 
you want the code for* The program will print 
the key symbol and the code* Running this 
program will also give you a good feel for the 
way the PE£K<764> iMthod works* In your 
program, then, check for the keys you want to 
respond to by using IF statements to compare 
the variable to the codest one by one* This is 
the best method to use if (a) you are only 
responding to a few keys, or if (b) you do not 
want to print the key symbol* This method is 
used twice, once for each reason, in the second 
example program below* 

The second solution is to use the ROM 
table that converts from keyboard code to 
ATASCII* The table starts at location 45278 
(hexadecimal $FEFE)* If the Keyboard Code is 
X, then the ATASCII code is stored at location 
65278+X* The use of this t^blm is illustrated 
in the first example program below* Two 
warnings though* 

A* The table location is not guaranteed to be 
the same in future versions of the Operating 
System* Presumably there is a "safe^' vector 
somewhere that points to the table, but Atari 
hasn't told us (or at least me) where it is yet* 

B* Lower case codes are returned if SHIFT 
is not pressed at the time* This is a somewJiat 
different convention than that used by BASIC, 
so be carefuL The first example program 
below shows how to convert the lower case 
ATASCII code to upper case by si4itracting 32 
from codes in the range for letters* 

EXAMPLE 1 (illustrates the various oDdm)} 

cpntinued 
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100 GRAPHICS 0 

110 PRINTJPRINT-TYPE AWAY!":PRINT 

120 POKE 764255lil£M^LEAR AHAY OLD 

CODES THAT COULD BE EMBARASSINO 

130 PRINT '*KBRD","KEY","ATSC" 

140 PRINT "COIffif ''^(BL''"€ODE" 

150 X=PEEK(764){REM-GET KEY CODE 

160 IF X=255 THEN ISOtREM-WAIT FOR 

FIRST KEY TO BE PRESSED 

SO HEADINGS CAN BE READ 1 70 

Y=PEEK(65278+X)JREM-CONVERT TO 
ATASCU 

180 IF Y>96 AND Y<123 THEN Y=Y-32:REM- 
CONVERT LOWER CASE TO UPPER 
190 Wmm X«CiiR»(Y)fY 
200 GOTO 150 

Thft second example illustrates (a) 

programming a loop that waits until a key is 
pressed allowing time for reading instructions 
dims 200 and 210Vand^ 41i^{Hrogram operation 
continuing without being halted by input 
operations* a 

EXAMPLE 2t 

lOOGRAFHICSO 

110 PRINT "COUNTING PROGRAM "IPRINT 

120 PRINT "KEYBOARD CONTROLS" 

130 PRINT "1 - PRINT EACH NUMBER 

(DEFAULT)" 

140 PRINT "2 - NO PRINTING" 
150 PRINT "3 - PRINT ID'S ONLY" 




10 REM LIST.ENT 

20 REM BY PAUL KHEELER 

30 REM 

40 REM SAVE THIS PROGRAM AS D!UST»ENT 
50 REM TO LOAD,LIST,DELETE,ENTER AND 
60 REM SAVE A PROGRAM TO CONSERVE ON 
70 REM MEMORY, AND HELP PREVENT SUP- 
80 REM UPS IN THE PROCESS. 
90 SEN USEFUL FOR ELIMINATING NO 
1001^ LONGER NEEDED VARIABLES THUS 
1 10 REM SHRINKING PROGRAM SIZE 
120 REM 

130 PRINT CHR*(125)tDDf DNtdSnPRINT 

140 PRINT IPRINT "ENTER '0' TO RETURN TO 
DOS:" 

150 FRUIT "EMTBi '1' TO EMDftFRDIT 

160 PRINT {PRINT "DISK FILE NAME? 
"UINPUT DN«iPRINT CHR»(i25) 



160 PRINT "4 - RESET TO ZERO" 

170 POKE 764,255{REM-CLEAR OLD KEY 

CODES 

180 PRINT "PRESS ANY KEY TO START" 
190 Z=1.'REM-SET CONTROL TO DEFAULT 
200 Y»PEEK<744)1REN-CHECK IF KEY 
PRESSED 

210 IF Y=255 THEN 200JREM-IF CODE 255, 
NOT READY 

220 POKE 764,255{REM-KEY PRESSED, 
CLEAR CODE 

230 X«0tREM-THIS IS COUNTING VARIAffiJE 

240 Y=PEEK(764):REM-CHECK FOR NEW 
COMMAND 

250 IF Y031 AND YO30 AND Y026 AND YO 

24 THEN 340:REM-CHECK FOR KEYS 1-4 

260 SOUND 0501010JREM-START CHIRP 

270 IF Y-31 THEN Z*i:REM-DECODING 

280 IF Y=30 THEN Z=2{REM- COMMAND 

290 IF Y=26 THEN Z=3:REM- CODE 

300 IF Y=24 THEN ZMJREM-KEY BY KEY 

310 PRINT -CONTROL "JZJREM PRINT TO 

SCREEN RESPONSE 

320 SOUND 0,0,0,OJREM-END CHIRP 
RB^ONSE 

330 POKE 764,255{CLEAR KEY CODE 

340 X-X+1 

390 IF Z»2 THEN 240 

360 IF Z=4 THEN Z=l {X=0 

370 IF Z«l THEN PRINT X:G0T0 240 

380 Y-X/10 

390 IF Y=INT(Y) THEN PRINT X 
400 GOTO 240 



170 IF DN*-"!" THEN END 

180 IF DN$="0" THEN DOS 
190 PRINT 

200 PRINT "LOAD ";CHR<(34);DN«K:HR*<34) 

210 PRINT JPRINT :PRINT "LIST 

"}CHR*(34);DN*{CHR$(34) 

220 PRINT iPRINT {PRINT {PRINT "NSW 

230 PRINT {PRINT {PRINT "ENTER 

";CHR$<34){DN»;CHR$(34) 

240 PRINT {PRINT iPSINT "SAVE 

";CHR*(34)}DN*{CHR*(34) 

250 PRINT {PRINT {PRINT "RUN 

";CHR$(34)|-D!LIST.ENT"K:HR»04) 

260 REM 

270 REM POSITION CURSOR TOP OF SCREEN 

280 REM 

290 POKE 84,0 

300 END 

310 PRINT {PRINT "PRESS [RETURN] AFTER 

COMPLETION- . .i r ^ 

320 PRINT "OF EACH COMMAND*" 



18 M.A.C»E.9 MiBL¥^4a82 



I DOWN MEMORY LANE I 

By Sheldon LMmon 

Remember way back to my last column i^hen 
I introdyced a byte-transfer routine as a 
method of saving your screen to disk? I 
mentioned then that the routine could be used 
for a number of other applicationst Hellf I 
thought I might get more specific on some 
other uses* Before I starts a couple of 
comments* Firstt X would like to apologize for 
the bug in the listing in the screen read 
routine. As Ron Kramer astutely pointed out» 
line 2010 had a statement that read PUT ItA* 
This is not a legal BASIC statement, and 
should have read POKE I,A* I could just admit 
I goofedf but I would rather just say that it 
was my idea of a swell April fool's joke# 
Pretty funny, eh? The correct listing is 
included belowt Next, I would like to point 
out that the routine will work with cassette 
as well; although cassette I/O is inherently 
sl€Hi#eri this routine works relatively quickly* 
All you have to do is replace the statement 
"OPEN #X,Y,0,"DJDISKFILE" with the 
statement "OPEN #X,Y, 1 28,"C}"» The 
auxiliary value of 128 means that the cassette 
will use short interrecord gapSt If tliat 
sounds like Greeki how about saying it goes 
faster? 

One very helpful application is in 
developing character screen displays, both of 
plain text, and redefined graphics characterst 
This will let you do things as diverse as 
setting up a nice screen of instructional text 
(without having to figure out the spacing using 
multiple PRINT statements) to designing game 
boards. The following program shows how to 
do thisi 

10 OPEN #2,4,0,"K!" 

20 GET ♦2,A{ IF A = 27 THEN POKE 

752,1 :?CHR$(28);:G0SUB IOOOJ poke 752,0J 
?CHR»i;^;£ND 

30 ?chr$(A);:goto 20 
1000 open #1,8,0,»djscreen.dat" 

1010 Pm #14?£EiC(939): FORIsO 
TO 3! PUT ♦1,PEEK(708+I): NEXT I 



1020 RAMTOP=PEEK(I06)*25AJ DL« 
PEEK(560) + PEEK(561){ BYTES= 
RAMTOP-DLJ HMNT<BYTES/256W 
LO=BYTES-(HI#256) 

1030 POKE 850»lliPOKE 892,FEEK(S60)t 

POKE 853,PEEK(561): POKE 856,LO{ 
POKE 857, HI 

1040 X=USR(ADR("hhh*LVd"),16)J 
CLOSE *i: REM The * and d must 
be inverse video 

To use this program, just type on the 
screen until you get the image just as you 
want itf Then, hit the ESCape key to save the 
screen to disk. To read it back in, use the 
routine given last monltit 

2000 OPEN #1,4,0/'D:SCREEN.DAT" 

2010 GET *ltAt GRAPHICS a: FOR I» 

708 TO 712JGET *1,A:P0KE I,AJNEXT I 

2020 POKE 850,7:POKI: 852,PEEK(560)} 
POKE 853,PEEK(561)}POKE 856|2551 



2030 X=USR(ADR("hh*LVd")#16)J 
CLOSE *12 REMember to invert » & d 

Later, if you want to put th# screen data^ 
into PRINT statenmfitSf so that no I/O read ' 
will be necessary, you can let the computer do 
the worki by OPENing the screen data file far 
a readf and GETting the data bytes 40 at a 
time to put into PRINT statments (the 
technique of making your cofi^puter write lines 
of prograiR code for you has been discussed 
elsewhere, and it's not too hard to figure out 
how to make a program loop print line 
numbers, PRINT statements^ and then data 
read in from a disk or tape)* If you do try to 
put this data into PRINT statements^ 
remember to convert from Internal Character 
Set order to ATASCII* 

Another nice use for this kind of a routine 

is to install a redefined character set into a 
BASIC program* Although I hinted at this in 
my application notes in the Instedit manual, I 
never actually came out and gave the routine* 
Hell, here is all you need to read in character 
data from a file called MY«SET: 

1000 RT=PEEK(106)-5{ POKE 106#RXJ 

continued 



GRAPHICS O: BASE=RT+1 

1010 OPEN #l,4,0t "DJMY^SET" 

1020 POKE 850,7JPOKE 852,0? 

POKE 853JBASEJPOKE 856t0:PQKE 857|4 

1030 X=USR(ADR("hhh*LVd),16): 
CLOSE *li POKE 756» BASE! RETURN: 
REMember to invert # & d 

Another good uM for this technique is to 
save long strings* Just use the ADR ftmction 
to find the starting adress of the string, and 
then split this addfMft into two bytes with 
the forumula 
HI=INT(AD/256):L0=AD-(HI*256)* Store the 
low byte in ICBAL and the high byte in ICBAH* 
Then, split the LENgth of the string into high 
and low bytes, and strore them in ICBLH and 
ICBLL fi^ectivelyt Set the command number 
in ICCOM, then use the CIO calling routine in 
the USR statement above* 



I hope that these techniques will spur you 
to experimenting more with character 
graphics, (and, not accidentally, into buying 
more copies of Instedit, the handy home 
wonder for creating characters)* These 
routines represent some of my pet 
programming techniques* What about yours? 
I've been writing this column for months, and 
besides the odd muttered compliment, I've 
gotten no feedback whatsover* I meant its 
like one of those Twilight Zone episodes^ 
where this guy wakes up and finds that 
everybody else has disappeared, and he keeps 
rurniing uroun^looJcing for them, and it turns 
out that either he slept for 1000 years, or 
there was a nuclear war, and nobody told him, 
or something* Do Do £)o Doi Do Do Do Do, Do 
Do Do Do, Da-Da-Da DAH* So how about it 
gang? I'm getting tired of both asking the 
questions and giving the ^nswers^ — its like 
playing piano duets by myself* Let's change 
the format to Ask Dr. Memory^ with some 
active reader participation* I'm tap dancing 
as fast as I can, but I can't keep it up forever* 

& 
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HIGH PERFORMANCE 
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SUPER SALE ON SOFTWARE 



I I I 
• • • 



$C. - $2k,99 5^ off 
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$100.00-$l49.99 20% off 

$l50.00-and up 2 5:% off 



(31 3) 254-2698 



WE 





Computers, Software & Service 

52130 Van Dyke, Utica, Ml 48087 
Metro Plaza between 2^St4Mi\e Roads 



BIGGER AND BETTER 



I t * 

• • • 



20 M.A.C.E.. AAAY* 1982 




By J erry White 

For those of you that only know Jerry 
White as an outfielder fw the Montreal Expos» 

let me introduce myself* I don't play baseball* 
I make my living from my ATARI software and 
by writing for various magazines^ 

I recently read the March and April issues 
of your Newsletter and was very impressed* I 
find it hard to believe that a nonprofit 
organization can put out such a quality 
publication on a monthly basis* 

While reading Eric Sobocinski's article on 
page 22 of the April issue^ I thought of a few 
ways to speed up his BASIC code* Don't get 
me wrong* I know that his code was written to 
demonstrate modifications to ATARI'S 
character set* I found the article and program 
to be very informative and well written* 

I modified his code to demonstrate 
methods of speeding up ATARI BASIC* If you 
look at page 22 of the April 1982 newletter» 
you will find two programs* I've combined 
them^ removed all REM statements^ rearranged 
the instnictions» and added few* 

Look at my version of this program* In 
line lOf I've added the GRAPHICS 0 command 
and POKES to location 559 to disable and 
enable the screen display* The combination of 
the POKESf the elimination of REMSf and 
keeping the FOR/NEXT loop on a single line, 
cut down the character set move from 15 
seconds to about 9* 

The slowest part of the program is the 
large character display routine* We could 
speed that up by about 1/3 if we disabled the 
screen again^ but at least for the time being t 
don'^t add those PCIKBi^ 

Notice that I jumped from line 10 to line 
200* I did this to get the large character 
display routine as close to the beginning of 
the program as possible* FOR/NEXT loops 
execute faster if they are kept near the 
beginning of a program* In this case, the 
program is so small that it won't make much 
difference* For a better examplet load a 



rather large ATARI BASIC program* Add this 

line as line 0 and again as line 30000* 

0 GRAPHICS OJPOKE 559,0JFOR X = l TO 
lOOOJNEXT XIPOKE 559^4JSTOP 

You will find the loop at line 0 to be many 
times faster than the exact same code at line 

30000^ if a large program is placed in between* 

Hhen trying to make an ATARI BASIC 

program faster^ try to eliminate as many 
mathematical calculations as possible* The 
original program had an e unnecessary 
exponential calculation m line 90* Looking at 
my version, I added the variable P2 to hold the 
value of 2'^B in line 50* Then I used P2 
instead of 2"^B and avoided one calculation* 
You will notice the difference if you watch the 
original program when it puts each CHR$(160) 
or cursor on the screen* 

Other thim restructuring the code» the only 
other change I made was to add a TRAP in line 
210f just in case the user enters non-numeric 
input or presses the RETURN key before 

entering a number* 

Since most of my software is written in 
ATARI BASIC with Assembler subroutines, 
I've learned lots of little tricks that make 
programs run faster and look more 
professional* Hopefully this little 
demonstration will help you use ATARI BASIC 
more effidentlyf and I'll bm able to show you 
other ways in future articles* @ 



10 GRAPHICS OJPOKE 559,0:FOR L = 0 TO | 

1023:POKE L^14336,PEEK(L+^57344)}NEXT | 

LJPOKE 756»56;POKE 559,34{GOTO 200 I 

50 FOR L=C TO C + 7r? LI" ";:P=PEEK(L).TOR I 

B=7 TO 0 STEP -1JP2=2'^B;IF P<P2 THEN ? I 

CHR«i32)|MiOTO 100 I 

90 ? CHR$(160);JP=P-P2 i 
100 NEXT B:? JNEXT L:G0T0 210 
200 ? CHR$(125)J? "TYPE A NEGATIVE CODE 
TO STOP" 

210 POKE 84, 3J? "INTERNAL 

CODE"{CHR*(254)JCHRi(254);TRAP 210JINPUT < 

C:iF C<0 THEN END 

220 C=C*8+PEEK(756)*256{FOR L=l TO 5;? j 

{NEXT L:? "LOCATIOM-JGOTO 50 1 



DISCOUNT ACCESSORIES 



□ 



Ch«ck Programs Dosired 



ADVENTURE lfl»IMiATK>NAL 


Lf9T 


□ 


Star Trek 3.5 


Oil AC 

24.95 


□ 


Lunar Lander (d) 


4 A AC 

19.95 


□ 


Rear Guard (d) 


AC 

24.95 


□ 


Advtnftire^l - Adventureiand (t) 


<• A AC 

19.95 


□ 


Adv«ntuf« #2 - Pirate's Adv U) 


19.95 


□ 


Adventure #3 - Mission Imposs (t) 


19.95 


□ 


Adventure #4 - Voodoo Castle (t) 


19.95 


□ 


Angle Worms/ Croion Diversion (t) 


1 A AC 

14.95 


□ 


Deflection (t) 


14.95 


□ 


Mountain Shoot (t) 


AM ftp 

14.95 


□ 


Treasure Quest (t) 


19.95 


□ 


Rear Guard (t) 


4 A AC 

19.95 


ATARI INCORPORATED 




□ 


Word Processor (d) 


149.95 


□ 


Personal Finance Management (d) 


74.95 


□ 


Caverns of Mars (d) 


39.95 


□ 


Invitation to Programming 2 (t) 


29.95 


□ 


Invitation to Programming 3 (t) 


29.95 


□ 


Conversational French (t) 


59.95 


□ 


Conversational German (t) 


59.95 


□ 


Conversational Italian (t) 


59.95 


□ 


Conversational Spanish ft) 


59.95 


□ 


The Programmer Kit (c) 


79.85 


□ 


The Entertainer Kit <c) 


116.75 


□ 


Aitiroldsic) 


44.95 


□ 


AM&m^ler Editor (c) 


59.95 


□ 


Atari Basic (c) 


59.95 


□ 


^Mce invaders (c) 


44.95 


□ 


Missile Command (c) 


44.95 


□ 


Star Raiders (c) 


49.95 


□ 


Centipede (c) 


44.95 


□ 


Pac man (c) 


44.95 



AUCADE PLUS 

□ Ghost Hunter (d) 

□ Ghost Hunter (t) 

ARTSCI 

□ Poker Solitare (d) 

□ Gomoku (d) 

□ Reversi (d) 

□ Poker Solitare (t) 

□ GonrK)ku (t) 

□ Reversi (t) 



34.95 
29.95 

24.95 
29.95 
29.95 
14.95 
19.95 
19.95 



'Many 

YOUR 

PRICE 
18.00 
15.00 
18.00 
15.00 
15.00 
15.00 
15.00 
11.00 
11.00 
11.00 
15.00 
15.00 

100.00 
54.00 
29.00 
21.00 
21.00 
44.00 
44.00 
44.00 
44.00 
67.00 
•4.00 

44.00 
44.00 
33.00 
33.00 
36.00 
33.00 
33.00 



25.00 
21.00 

18.00 
21.00 
21.00 
11.00 
15.00 
15.00 



Mor« Available at Discount Prices 







YOUR 


AVALON HILL GAME COMPANY 


LIST 


PRICE 


□ Conflict 2500 (t) 


16.00 


12.00 


□ Planet Miners (t) 


16.00 


12.00 


□ Lords of Karma (t) 


20.00 


15.00 


□ Empire of the Overmind (t) 


30.00 


21.00 


□ Tanktics(t) 


24.00 


17.00 


□ Computer Stocks & Bonds (t) 


16.00 


12.00 



BRODERBUND SOFTWARE 

□ Apple Panic (dj 


29.95 


21.00 


BUDGECO 

r~l RactAr Rla^tpr Id) 


29.95 


21.00 


CAVALIER 

□ Bug Attack (d) (t) 


mM 


21.00 


COMPUTER MAGIC, LTD. 

□ Kayoe(d)(t) 


34.95 


25.00 


DATASOFT 

□ Atari Mailing Lis (d) 

□ Text Wizard (d) 

□ Dung Beetle (d) 


24.95 
99.95 
29.95 


18.00 
75.00 
21.00 


GEBELLI 

□ Match Racers (d) 

□ Andromeda (d) 

□ Pathfinder (d) 


29.95 
39.95 
34.95 


21.00 
29.00 
25.00 


INNOVATIVE DESIGN 

□ Pool 1.5(d) 


34.95 


25.00 


J V SOFTWARE 

□ Action Que$t (d) (t) 


29.95 


21.00 


KBYTE 

□ K-Razy Shootout (c) 


49.95 


36.00 


ON-LINE SYSTEMS 

□ Crossfire (d) (t) 

□ Mousekattack (d) 

□ Jawbreaker (d) (t) 

□ Threshold (d) 

□ Frogger (d) 


29.95 
34.95 
29.95 
39.95 
34.95 


21.00 
25.00 
21.00 
29.00 
25.00 


SYMERGISTIC 

□ Warlock's Revenge (d) 


35.00 


25.00 



WE DEAL IN BUSINESS'EDUCATION'ENTERTAINIVfEINT SOFTWARE 

ATARI JOYSTICKS □ SANYO 13 INCH □ ZENITH ZVM-121 □ VERBATIM DATALIFE 

Color Monitor Green Monitor Bex of 10 Disks 

«8 >425 *120 *26 

CREDIT CARD ORDERS ACCEPTED BY PHONE 4 PM-7 PM DAILY MONDAY THRU FRIDAY 



□ PLEASE SEND THE PROGRAMS CHECKED 

□ PLEASE SEND THE ACCESSORliS CHECKED 

□ PLEASE SEND FREE CAmOG DRIVE- □ DISK □ CASSETTE 

NAME ■ 

ADDRESS 

STATE 



ZIP 



AMI. ENCLOSED. 



CHARGE MY □ VISA □ MASTERCARD # 
cypipp<; SIGNATURE 



MFG&. TRAOEAMAK 



STROM 

^ ^ ^ SYSTEMS INC. 

P.O. Box 197 
Plymouth, Mi. 48170 
(313) 455-8022 

Send check or money order for 
total purchase price, plus $2. 
postage handling. Michigan 
Residents odd 4% tax - C.O.D. 
add $5. 
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By Marshall St Dubin 
Part 2: Controlling Power 



Last month we looked at various ways of 
monitoring "real world" devices such as 

thermostats or light sensors using Atari's 
joystick ports* This months we will look at 
ways to use the ports for output* This gives 
you a means to control a wide variety of 
external devicest relays^ and the like* 

As you can see from the pin diagram in the 
figure, the joystick port has several potential 
input sources available* For example, two of 
the pins are intended for use with the paddle 
controllers* These are called the ANALOG 
pins* They take an analog source such as a 
variable resistance and convert it into a 
digital signal* This is in essence how the 
paddles function* They provide a resistance 
via a potentiometer within the paddle unit, 
between the analog input pins and +5 volts 
DC* The computer ifiterpets the variable 
voltage at a digital number between 0 and 228* 
This is called "on board" analog to digital 
conversion* Units performing a similar 
function may be purchased at a hefty price, 
but Atari owners have the use of 8 of these 
units built right in! 



1-4»PIA 
Trigger 

+ 5 volts 
(Vcc) 




Analog 1 
Analog 2 
Ssfttom ground 



(itiputo) 



For now, lets concentrate on pins 1-4 on 
the joystick ports* These are the pins of the 
Peripheral Interface Adapter chip, more 
commonly referred to as the PIA* Basically 
the PIA provides a mean of connecting your 
computer to peripherals* The PIA chip can be 
programmed for either input or output* There 
«re two PIA ports of eight bits each available 
for your use* J oystick ports 1 and 2 compose 
PIA port A, while joystick ports 3 and 4 
compose PIA port B* Each port is one byte (8 
bits) and may be used together or individually 
to provide input and output functions* Some of 
these functions may be used to drive a printer 
or other accessory, or even a series of power 
relays which can control alarms^ lightsi 
applianoMf fnotom or wtatever* 



The problem involved in controlling larger 
interface devices is basically a problem of 
taking a small amount of power and amplifying 
it* The ports on your computer are not made to 
power anything more than another chip* The 
manual recommends a maximum of 1 TTL load 
(1*6 ma*) for each PIA bit, and no more than 
ma* at the +5V pin* If we are using relays or 
controlling power» we will need at least 12-24 
volts* 

There are several ways to accomplish this 
task* The figures below illustrate some of 
them* The most common arrangement is the 
transistor driver* In this arrangement the 
computer provides a very small voltage which 
turns on the transistors which in turn switch 
the load* A second way is through the use of 
opto-isolators* The computer pr^iikrs 5 volts 
which switches the LED (light emitting diode) 
of the isolator oo« Hhen the diode is Utt this 
triggers a photo sensitive transistor which is 
connected to a larger load or a relay* A 
DARLINGTON transistor package can be used 
in a siffttlar fashion* The low voltage fires the 
Darlington transistor which can then switch a 
considerably larger current* Finally there are 
integrated cirmrft interface chips such as the 
7407 which allows a switching of up to 30 
volts from the 5 volt TTL level of the Atari* 

All of these methods will work, and 
actually which one to use will depend on the 
specific environment or task lined up for them* 
The method I prefer is the 7407 chip* It is 
inexpensive, will handle up to 30 volts, and 
has six gatesf so that I may switch six devices 
from a single chip, and will handle about 30 ma 
which will drive most small relays or solid 
state s«nteties# 

The SN7407 made by Texas Instruments is 
an open collector device* To us« it properly 
you must connect a 2*2K ohm resistor from 
each output to -fS volts* When an output is 
"on* the output is actually open - so the 
resistor supplies +5 to the device you are 
driving* You can drive up to 30 volts at the 
outputs (but you may have to tamper with the 
value of the resistor somewhat)* When an 
output is "off", it is shorted to ground, and 
your device sees 0 volts (ground actually)* The 
resistor limits this current to a fairly low 
value so you don't blow the power supply or 
worse» the chip! Since tfto resistor can^t 
supply much current, make sure the 
resistor/7407 combination is seen as the 

continued 
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"ground side" of ycHir circuit* i*ef to drive a 
relay# connect +5 to one side of the relay* and 
the other tute to the output of the 7407* Then, 
to turn the r«Uy on, turn thm 7407 OFF* 
Current will flow through the relay # and then 
through ttm 7407 to ground* 

You can easily drive descrete LED's with 
this too isuch as f or test lights)* as well as a 
variety of small r»lays or solid state 
switches* Just make sure you SINK the 
current ie* one end of your driven device goes 
to +5 (through m resistor!) and the other end to 
the 7407^ Sending a "0" (logic level low) to the 
PIA turns the device ON, and a "1" (logic level 
high) turns it OFF* If you want to do it the 
other way around, use the inverting 7406, 
which will turn your device ON with a high 
logic l«v#l and OFF with a low level* 
Recognize though that the default state of the 
PIA when the coinputer is powered up is all 
bits high* If you are using lui inverting 7406i 
your devices would come alive when you 
powered on the Atari. This is why I prefer to 
use the 7407 f since I can power up and then 
have my software drive the devices by writing 
a 0 to the bit I want to power a device from* 

Speaking of bits, a few words are in order 
about the structure of the ports before you 
run off to warm up your soldering irons* The 
PIA as I mentioned earlier consists of two 
ports, port A and port B (or PORTA and 
PORTB for all you pMumonics phreaks)* These 
are controlled through the use of the control 
registers for each port, PACTL and PBCTL, 
You may heve heard of th*- PACTL because 
thats the r .e you poke with 52 to turn on the 
cassette player* The addresses are as follows* 

PORTA 54016/$D300 - port A address 

PORTB 54017/$D301 - port B address 

PACTL 54018/$D302 - port A control 

PBCLT 54019/*D303 - port B control 

On {lower up» the ports are initialized to 

$FFFF or all bits high* To use a port for input, 
just pull the bit of your choice low by 
connecting it to giround* To use the port for 
output, it first must be formatted for output* 
The procedure is not complex* 

1* Poke the control register (PACTL or 
PBCTL) with 56/*38 hex* 



2* Now poke the port (PORTA or PORTB) with 
255/$FF hex* This specifies the port will be 
used for output* 

3* Poke PACTL or PBCTL with 60/$3C hex* 

4. Now just poke the port (PORTA or PORTB) 
with your data* 

Essentially you have a total of 16 bits to 
play with* Just remember that two joystick 
ports make up one PIA port* Stick 0 and 1 are 
the A side and stick 2 and 3 are side B* Each 
joystick port is 4 bits or 1 nybble* Each side 
of the PIA is 8 bits or 1 byte* When 
programming for output » you must remember 
that a specific BIT is driving a device* 
Therefore one joystick port can drive 4 
devices (1 for each bit)* An entire PIA side 
will handle 8 devices and if you use both A and 
B sides you can trigger 16 individual devices 
at once or in any combination* You must POKE 
into that port a decimal number whose 
BINARY representation will switch on a 
certain bit or series of bits* For example, if I 
POKED a 255 into port At aU bits ¥Kiuld be on* 
If I POKED a 12 into port A, bits 3 and 4 only 
would be on* The individual joystick ports may 
be rei^ using the shadow registers^ foUo«#s» 

Jack 1 (STICK 0) 632/ »278 hex 
Jack 2 (STICK 1) 633/$279 hex 
Jack 3 (STICK 2) 634/$27A hex 
Jack 4 (STICK 3) 635/»27B hex 

You also can use the BASIC keywords STICK 
to access these ports ^« X=STICK(0)# etc* 

The program listing will provide you with a 
demonstration on how the ports are 
programmed* The program first allows you to 
select a port, and program it for either input 
or output* Then you can write data to the port 
and the computer will peek the port and verify 
the data you wrote* Granted this isn't 
elaborate, but it works* Next time we will 
delve into a useful construction project^ and 
I'll provide a more sophisticated driver 
routine to monitor real world data* For nowt 
get used to the functions of the PIA ports and 
the various drivers I have illustrated* Then 
prepare your soldering iron for action » and I'll 
see you next month! Q 

continued 
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10 REM « PRdORAM TO FORMAT PIA PORTS 

20 REM 

30 GRAPHICS 0:POSITION 10,2 
40 DIM IO$(10),OATA«(3) 

50 PRINT "PIA PORT DEMO" 
60 REM 

70 REM PORT ADDRESS 

80 REM 

90 PORTA=54016JPORTB=54017 
100 REM 

1 10 REM * ROUTINE TO CONFIGURE PORT 
120 REM 

130 TRAP 130JPRINT JPRINT "Configure which 

port (1-4) 

140 INPUT P0RT:IF P0RT<1 OR PORT>4 
THEN 130 

150 REM 

160 REM SELECT PORT CONTROL REGISTER 
170 REM ADDRESS <PACTL»PBCTL) 

180 REM 

190 IF P0RTC3 THEN 
PCTL«54018{PORT«PORTA 

2 0 0 IF PORT>2 THEN 
PCTL=540 1 9:P0RT=P0RTB 
210 PRINT :PRINT 



520 END 

530 TRAP 40000;PRINT "INPUT ERROR, 
RE-ENTER "{{GOTO 440 



Input 




Q1 



OPEN COLLECTOR 

TRANSISTOR DRIVER 



Darlington TrantUter Pockog* 



m Gat* 



iz.0 REM 



230 REM SELECT INPUT OR OUTPUT 
240 REM 

250 PRINT "Input or Output "I 

260 TRAP 2505INPUT 10$ 

270 IF I0*(1,1)="I" THEN F=0iGOTO 340 

280 IF I0*(1,1)="0" THEN F=255tGOTO 340 

290 GOTO 250 

300 PRINT 

310 REM 

320 REM CONFIGURE THE PORT 
330 REM 

340 POKE PCTL,56 
350 POKE PORT,F 
360 POKE PCTL,60 
370 PRINT :PRINT 
380 REM 

390 REM ENTER YOUR DATA 
400 REM 

410 IF IO«(l,l)="I" THEN PRINT "PORT IS 
FORMATTED FOR INPUT":PRINT IGOTO 130 
420 PRINT "NOW ENTER YOUR DATA" 
430 PRINT "(ENTER A RETURN TO DO 
ANOTHER PORT)" 

440 INPUT DATA$:iF DATA**"* THEN PRINT 
CHR$(125);G0T0 130 
450 TRAP 530 

460 REM 

470 REM POKE DATA TO PORT/VERIFY IT 
480 REM 

45'0 POKE PORT,VAL(DATAf > 

500 PRINT "VERIFY "JPEEK(PORT) 

510 GOTO 440 




DARLINGTON DRIVf R 




OPTO ISOLATOR -± 



Ground 



V«ll«to lofntotmr 




toloy CoU 



Contacts 



7407eirto 



7407 DRIVER WITH RELAY 
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By Eric Sobodnski 
Part 21 Dcxjble Trouble 



Hi there! Welcome to another trip through 
Atariland* Perhaps some of you are wmdermg 
why I changed the name of this column after 
just one month* I decided that I want to write 
about more than just memory* There are a tot 
of other areas that still need to be covered* 
Incidentlyt if anyone feels they can give us 
suggestions^ or even bettert writm ttmir awn 
little article^ please do so* 

A BIT OF BINARY 

Here's the squib I promised you last 
month* In normal life we use the decimal 
system (base 10)* There are ten digitSr and 
each place has a value that is ten times that 
of the place to its riflht* The binary systemt in 
comparison f is base 2* There are two digits^ 
"0" and "1", and each place has twice the value 
of the place to its right* The value of each 
binary pliiae is given belowi 



Place: 7 J 5 4 3 2 - f 0 
Valie: 128 14 32 IS I 4 2 1 

Notice: 2^=128 2^=M 2^=32 2^=16 2^=8 2^=4 2^=2 2«=1 



If we wish to find the decimal number 673f 
we reason that there are 6 hundreds* 7 tens* 
and 3 ones} 

6x10^ + 7x10^3x10^ 

The same thing is done with binary* Let's use 
the decimal number 37* 37 is not 44 or greater^ 
so we ignore place values higher than 32« 
There is one 32 in 37, so we write a "1" and 
subtract! 37-32=5* There are no 16's or i's in 
5, so we just write two "0"* There is a 4 in 5f 
so we write a "1"* 1-1=0, so we just fill in the 
rest of the places with zeros* except there 
aren't any more places* Now that %i^e're done, 
you should have 100101* When we deal with 
computers* though* we usually deal in eight 



digits, or a multiple of eight* so our final 
result is 00100101* 

Going from binary to decimal is much 
easier* In the example above there are "I's** in 

the 32's, 4's, and I's places (place numbers 5, 

2 and 0)* Add them together? 1x32 + 1x4 + 
lxl«37* That's all there is to it* Hexadecimal 
is base 16* Letters A through F symbolize the 
numbers 10 through 15* See if you can figure it 
out yourself* 

FLIPPING YOUR DISK 

Most of you have probably heard about 
using both sides of a standard diskette* but 
fton't know hom^ Wm really simple* Using a 
common paper hole punch* carefully cut a half 
circle directly opposite the write-protect 
notch* as shown below* On a 5 1/4 inch 
diskette* center your punch exactly 1 5/16 
inches from the end of the diskette* Make sure 
tHe measureeient is fairly accurate* Hhen 
directions are followed* there should be no 
problems* At least I haven't heard of any* A 
few words of warning! Many of the eempaniee 
who make your diskettes will not honor their 
warranties once you have altered themt so 
make sure side one works before you try this 
procedure* Also* normal disk care becomes 
doubly inportant when you double-side a disk* 
Always keep your disks clean and nev^ touch 
the disk itself* 

Here I am* my mind devoid of anything else 
to say for this month* This is May* isn't it? 
Happy Birthday M*A#CJ54! In closing^ I would 
like to w e lcome any comeiefite yon liave about 

anthing Atari* or even this series* Good luck 
and Happy Computing! & 




MACE is a non-profit organization 
which is run on a voluntary basis BY 
MEMBERS, FOR MEMBERS* This 
newsletter is not meant to be a forum 
for the few in the know to lecture the 
rest of us on what we should be doing 
with our computer* Rather, it is a 
place for members to share with others 
the experiences they have had relating 
to the field of personal computing. 
The range of things we would like to 
deal with in this newsletter is as wide 
as the range of experiences of our 
members* 

So, don't think that just because 
you don't have a doctorate in computer 
science that you have nothing to add* 
We are interested in receiving articles 
from members at ALL levels of 
experience — a majority of our readers 
could probably be classified as 
beginners^ and they could really 
benefit from the experience of other 
beginnners, or those who can remember 
when they were beginners and speak to 
the subjects that confuse and puzzle 
those just getting started* 

And, of course, we are not just 
interested in technical articles* 
Everybody ha^i bought some kind of 
software* Maybe you would like to let 
others know which software you liked, 
and whyt or which to avoid* Even 
personal experiences on how computers 
have changed your lifestyle, your 
family life# your circle of friends could 
be written up* You could become the 
Erma Bombeck of MACE* 

MACE has tried its best to give as 

much as possible to its members* But 
that's only possible if you give 
something back* Krite an article, and 
send it to MACE Newsletter, P*0* Box 
2785, Southfield MI 48037* 




THE RAINBOW 
ADVANTAGE 



Outstanding Service 

Our professional staff will use 
their expertise to help you 
select the computer 
system that meets your 
business or persor^l 
needs. 

Informative 

Classes 

A phone call will 
reserve your place at a 

Free Introductory 

Seminccr. Choose 
from a variety of topics 

on computer appli- 
cations. Classes are 
held weekly in our 
classroom or at your 
corporate location by 




Name Brand 
Systems 

Featuring such names 
as Apple, Atari, Zenith 
and VIC 20, we offer 
the hardware and 
software to build or 
complete your system. 

WE WILL MEET 
ALL COMPETITOR'S 
PRICES. 



..n/iW"'"' 



We're located on East 
Big Beaver Road in the 

Troy Commons Shop- 
ping Center, north of 
the 1-75 Rochester 
Road exit. 

HRS: Mon-Fri 10 to 9 
Sat 10 to 6 

528-3535 



tappiG Gompubczr 

""Authorized Dealer 
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ATARf 




COMPUTERS 

819 E. BIG BEAVER ★ TROY 
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CROSSFIRE 
ERIC CHODUN - 18,000 



ERIC CHODUN - 28,000 
(mask of death) 
JAMES HETZEL - 21,300 



ED CHU - 30,040 



RUSS HERSCHLER - 132,000 



JAMES HETZEL - 106,890 
(Commander) 



RUSS HERSCHLER - 27,390 




AXARI SOO 
Unused* unwrapped *700 
Call Russ 559-3278 

EPSON MX— eo 

With Graftrai and Friction feed option. 
8 mo, old, %ASO, Call Gary Luzier 
773-3440 



SK MEMORY 

Remembers well. Call Marshall Dubin 

338-3488 after 6* 

SOFTWARE 

«10 each! Space Invaders, Dynacomp 

pre-school games, Star Trek 3.5, Iridis 
#l-*5 Call Marshall Dubin 338-3488 
after 6, 



1982 MEETING SCHEDULE 



1 V 
15 
.1S> 



SERT.1&. 

OCT«2 1 

istov»is 



DECEMBER 1^ 



BERKLEY COMMUNITY CENTER 

2400 ROBINA 
BERKLEY, MICHIGAN 




11 MILE ROAD 
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msg* 0318 datej04/20/82 timej01q1j20 
from: wiluam volk 

TOIALL 
SUBJJ FORTH-GRAPHICS 
I have developed a turtle graphics package for 
atari forth* This includes all the Pitot/Logo 
commands and trig functions (interger)^ 
viewports and clipping* When compiled it 
occupies only 1*5K of Ram« I am also i^m'fcing 
on a players-missile package* which allows 
animation, and double players* I will 
{irobatiiUy have m link tn Dos files working 
soon* 

William Volk, Box 2053 Babcockt Durham Nh* 



'^MSG* 0322 DATE:04/20/82 TIME{23:57J35 

from: CiNTt DeefaR 

TOJ ALL 
SUBJ: Michigan INFO-fone 
Ail estjiblislied Bulletin Board with over 
11,500 callers and the kind of quality msgs 
this volume of use creates, is now waiting for 
your call* INFO-fone(tm) is located in 
Southfield, MI, and can be reached 24hrs a day 
at: (313) 357-1422* Call today for IBM-PC, 
APPLE, and other popular systems info* There 
are also more extensive information files and 
even downloadable programs* The -fone has 
two co#ifirelieiissv« filmi# lists of other 
bulletin board systems all over the country, 
arranged by both name as well as by area code* 
Ymj should make a -fone call today, and 
regularly, to keep up on the latest* - Curt 
(SYSOP) 



MSG# 0330 DATEJ04/22/82 TIMEJ09S6O1 
FROMi Sheldon Leemon 

to: KA6ETB,KA8MBJ, and all Hams 
SUBJ: Atari Amateur Radio Net 
I have just spoken to Jack McKirgan II, 
WD8BNG in OH, who is pleased to announce 
that the Atari Users' Net is full speed ahead* 
The first on-the-air meeting i#iU lie en May 2 
at IJOO UTC (Saturday night, civilian time) on 
21*410 MHz* Because coverage is bound to be 
more or less transcontinental on 15, a more 
regional version will meet on Sunday 
afternoons, 18100 UTC on 7*235* A West 



Coast version of the 40 meter net is being 
wiMTked out now, and there should be some 
word on it soon* Jack really intends to do 
this up big, with a newsletter and everything 
So all you hams, take note* Don't be a 
no-show, or recurrent lock-up may result! 
Those who wish an eyeball with Jack and other 
▲teri Hams at Dayton should listen on 
144*055* 73deN8SL* 



MSG# 0360 DATEJ04/28/82 TIMEJ2i:43J58 
from; Ollie 

to: ALL 
SUBJ! Atasdi Mode 

Many of the callers to this BBS have stated 
that they cannot enter Atascii mode with the 

'A' command* When the BBS prompts HIT 
<RETURN> after entering 'A% yoii mumt 
respond with an ASCII 155 character* If you 
have Telelink I, or another ASCII type 
terminal that 'returns' an ASCII 13 for the 
return character, you cefifiot enter Atascii 
mode* Leave a comment when you log-'Off if 
you Mve additional questions* 

— OlMe 



MSG* 0277 DATE:04/11/82 TIMEt00»l{24 

from: JIM STEINBRECHER 

to: all 

subjt setauto program 

There is a new program on download called 
SETAUTO* This will allow you to auto boot to 
a basic progreei on the disk* You may want to 
use it with the MENU program as in the 
example* Now the novice and the not so 
frequent ummr csfi get a disk program going* 
SETAUTO also will work with the 
Assembler/Editor if a valid Editor command is 
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By J udy Braun 
Using The INT Function 



character setM.just plain and simple BASIC!!! 
Send your written programs and solutions to 
me and next month we'll print the best 
solution and try another puzzle* 

Looking forward to hearing from you* 




The IMT function Is a method of 

eliminating the decimal portion of a number* 
For example, if X=3»887 then the INT(X) will 
equal 3* Notice that the INT function alone 
does not round off* So what can we do with it? 

One application is to express a division 
problem in the form of a quotient and its 
remainder* If you wish to divide 17 by 3 (3 17 
or 17/3) and express the answer as 5 with a 
remainder of 2 instead of 5*66666666# we can 
use th» foJJU3^%iung routine! 

10N=17:D=3 
20 Q=INT(N/D) 
30 R=N-(Q*D) 
40 PRINT QJ"R";R 

In line 20f 17/3s5«66666666 and its integer is 

5* To find the remainder, we multiply 5*3 and 
subtract it from 17 (line 30)* Line 40 prints 
our solution f 



Another application is to split numbers 
into separate digits* "25" is 2 tens and 5 ones. 
He wiU divute 25 by 10 and find the remaindert 
Using the above routine (changing line 10 to 
10 N=255D=10)» we divide 25 by 10 (2*5) and 
take the integer in line 20« Result: Q=2* In 
line 30t we multiply 2 by 10 and subtract the 
result from 25 resulting in R=5* Then in line 
40 we can: 40 PRINT Q{"TENS AND "{R}" 
ONES"* Now for some practice*** 

write a program that finds *all# 3 
digit numbers such that the sum of 
the cubes of its digits equals the 
number itself* 

example: 

1 53~> 1 ^V5^V3^=+ 1 25+27= 1 53 

Thus 153 is one of the solutions* 

Use the remainder routine* It is not 
necessary to PEEK or POKE or change the 




Judy Braun 
38281 Eliot 
Mt* Clemens, Mi* 48043 
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WORD LIST 



ALLSTAR 


GREAT 


OWNER 


ARMY 


HANDY 


PASTE 


ASPRIN 


HISS 


PATCH 


BARE 


JAZZ 


QUARTZ 


BUILD 


JUMP 


QUEASY 


COLUMN 


KITTEN 


QUICK 


DUCK 


KNOWLEDGE 


RADIUS 


EGO 


OBSTRUCT 


TEXT 


EXTRA 


OKAY 


TINT 


GLEAM 


ORGAN 


(VENTURE 



MICHIGAN ATARI COMPUTER ENTHUSIASTS 



President: 



Vice Pres.: 



Treasurer: 



Secretary: 



Arlan Levitan 
12709 Borgman 

Huntington Woods, MI 48070 
399-6963 

Micronet: 70675,463 
Source ID: TCT987 

Jerry Aamodt 
4148 Huhn 
Rochester, MI 48063 

574-1020 

Judy Braun 
39281 Eliot 

Mt. Clemens, MI 48043 

Sheldon Leemon 

14400 Elm 

Oak Park, MI 48237 

398-2608 



Programs: 



Gary Luzier 

22530 Gordon 

St. Clair Shores, MI 48081 

773-3446 



Librariaxi^ Sam Findley (Disk) 

8171 Denwood, Apt. #1 
Sterling Heights, MI 48077 
939-3822 

Rodney Graham (Tape) 

12270 Deming 

Sterling Heights, MI 48077 

264-6355 

Newsletter: Marshall Dubin 

2639 Hempstead 
Auburn Heights, MI 48057 
338-3488 " 



Program Library Submission Form 

I wish to submit the following program to the M.A.C.E. program library. I 
warrant that I have good title to this program, and that it does not infringe upon 
any copyright. Limited rights are transferred herewith for the use of this program 
within the membership of M.A.C.jl. and its associated Atari Computer organiza- 
tions. 



Program Name 

Description 



Submission Media: Tape 



Disk 



Catagory: Business 



Demonstration 



Education 



Game 



Utility 



Minimum System: Memory. 

Disk _ 



K BASIC 



Interface 



Assembler ^ 
Modem 



PILOT- 
Printer 



. Other 

PASCAL 
Light Pen. 



Name 



Joystick Controllers 



Paddle Controllers 
Phone 



Keyboard Cont. 



P.O Box 2785 
SoutMieldt Ml 48037 



$15.00 fee for 12 montlis* 




Name 
Street 

City_ 



Company (if applicable) 

System Description 

Suggestions 



I can help with . . . 



.A.C.E. Membership Application 

Phone 



State 



Zip Code 



Disk/Tape. 



□ New 

□ Reiiewai 

*Mak6 checks payable to; 
M.A.C.E. 



Date 



Amount 



□ Cash 

□ Check Number 



Coupon ^ 

. Membership Card Number 
Expires '. ■ 



M.A.C.E.. MAY, 1982 31 



WHAT oo Yoxj thiimk:? 



To keep providing you with the kinds of things you like to read about, we need the feedback 
from YOOf dear reader. Won't you take a minute and fill out this questionaire? Let us know what 
kinds of things you like to read about, and how you feel we ar» doing thus far. That way w« can 
continue providing you with one of the most comprehensive user publications available anywhere. 



i . Your system? Atari 800 



400 



DISK 



K MEMORY 



MODEM 



INTERFACE 



TAPE 
PRINTER 



2. What is the primary use of your system? 

f 

Business/Professional Education Games/Hobbies Other 



3 f What lei nd of things would you LIKE to do with your 
system? 

4# Do cithers in your family use the computer? yes no 



5* If yest what for? 



6* What kinds of things do you like reading about in 
MACE? _ 



7» What would you like to see more 



of? 



8« Less of 



Suggestions* 



10* Your age_ 



1 1 » Ages of other users in your f amily. 



Thank you for your time in filling this out* Please send you reply s to! 



M*A»C,E NEWSLETTER 
MARSHALL S. DUBIN, EDITOR 
2^9 HEMPSTEAD 
AUBURN HEIGHTS, MICHIGAH 48057 



mm 



mm 



mm 




RITE WAY ENTERPRISES 

EVERYTHING DISCOUNTED EVERYDAY 



DISK DRIVE 



HEAD CLEANINGKIT 



(313) 751-2454 

8262 12 MILE 
WARREN, Ml. 48093 



DISCOUIMT 

COMPUTERS 
- SCALES - 

CASH REGISTERS 



OPEN 
10 AM-^ PH 
HON— ^AT 



MICHIGAN ATARI COMPUTER ENTHUSIASTS 
PaOa BOX 2789 

S'OUTHFIELD, MICHIGAN 48037 
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IMPORTANT DATED MATERIAL 



PLEASE DO NOT DELAY 

Printing and Bindery Sirvices by • GRAPHIC ENTERPRISES, INC. Detroit. Michigan • 313-839-6800 



